diff options
author | Péter Diviánszky <divipp@gmail.com> | 2016-01-15 11:46:36 +0100 |
---|---|---|
committer | Péter Diviánszky <divipp@gmail.com> | 2016-01-15 11:46:44 +0100 |
commit | 79b39b990001f896154da529520015a0915dff64 (patch) | |
tree | 47d02a14ea62ea4fdd9615e771e0fd6f880bb288 /lc | |
parent | 077c178d45a602b24b55294d4ba609a71f1880af (diff) |
modify hw example & add TODO item
Diffstat (limited to 'lc')
-rw-r--r-- | lc/Builtins.lc | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lc/Builtins.lc b/lc/Builtins.lc index 88b90d57..502f040b 100644 --- a/lc/Builtins.lc +++ b/lc/Builtins.lc | |||
@@ -577,7 +577,10 @@ filterFragmentStream = FilteredFragmentStream | |||
577 | transformFragmentsRastDepth f = ShadedFragmentStream (FragmentShaderRastDepth f) | 577 | transformFragmentsRastDepth f = ShadedFragmentStream (FragmentShaderRastDepth f) |
578 | accumulateWith ctx x = (ctx, x) | 578 | accumulateWith ctx x = (ctx, x) |
579 | overlay cl (ctx, str) = Accumulate ctx str cl | 579 | overlay cl (ctx, str) = Accumulate ctx str cl |
580 | transformVertices f s = Transform (\v -> VertexOut (f v) 1 () (Smooth v)) s | 580 | transformVertices0 f () s = Transform (\v -> VertexOut (f v) 1 () ()) s |
581 | transformVertices1 f g1 s = Transform (\v -> VertexOut (f v) 1 () (Smooth (g1 v))) s | ||
582 | transformVertices2 f (g1, g2) s = Transform (\v -> VertexOut (f v) 1 () (Smooth (g1 v), Smooth (g2 v))) s | ||
583 | transformVertices3 f (g1, g2, g3) s = Transform (\v -> VertexOut (f v) 1 () (Smooth (g1 v), Smooth (g2 v), Smooth (g3 v))) s | ||
581 | renderFrame = ScreenOut | 584 | renderFrame = ScreenOut |
582 | imageFrame = FrameBuffer | 585 | imageFrame = FrameBuffer |
583 | emptyDepthImage = DepthImage @1 | 586 | emptyDepthImage = DepthImage @1 |