diff options
| author | Péter Diviánszky <divipp@gmail.com> | 2016-02-22 15:15:23 +0100 |
|---|---|---|
| committer | Péter Diviánszky <divipp@gmail.com> | 2016-02-22 15:15:44 +0100 |
| commit | 23b42e612a6a7864428674b3c9d63ed86fc07435 (patch) | |
| tree | 79bea78eba5d508ef9d4072c9721a4c09f87a000 /testdata/simple02.lc | |
| parent | 94dead004d04bd80db17429859454981513be814 (diff) | |
rename: fetch_ --> fetch; fetchArrays_ --> fetchArrays
Diffstat (limited to 'testdata/simple02.lc')
| -rw-r--r-- | testdata/simple02.lc | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/testdata/simple02.lc b/testdata/simple02.lc index e920e6c6..6a90ef03 100644 --- a/testdata/simple02.lc +++ b/testdata/simple02.lc | |||
| @@ -15,7 +15,7 @@ main = let | |||
| 15 | fragmentCtx = (DepthOp Less True, ColorOp blend (V4 True True True True)) | 15 | fragmentCtx = (DepthOp Less True, ColorOp blend (V4 True True True True)) |
| 16 | modelViewProj = Uniform "MVP" :: Mat 4 4 Float | 16 | modelViewProj = Uniform "MVP" :: Mat 4 4 Float |
| 17 | vertexShader ((v)) = (PrimMulMatVec modelViewProj v, v) | 17 | vertexShader ((v)) = (PrimMulMatVec modelViewProj v, v) |
| 18 | vertexStream = fetch "stream4" Triangle (Attribute "position4" :: ((Vec 4 Float))) | 18 | vertexStream = fetch "stream4" (Attribute "position4" :: ((Vec 4 Float))) |
| 19 | primitiveStream = mapPrimitives vertexShader vertexStream | 19 | primitiveStream = mapPrimitives vertexShader vertexStream |
| 20 | fragmentStream = rasterizePrimitives rasterCtx ((Smooth)) primitiveStream | 20 | fragmentStream = rasterizePrimitives rasterCtx ((Smooth)) primitiveStream |
| 21 | fragmentShader' = \((v)) -> ((V4 1.0 0.4 0.0 0.2)) | 21 | fragmentShader' = \((v)) -> ((V4 1.0 0.4 0.0 0.2)) |