SCM Repository
Diff of /trunk/src/compiler/simplify/simplify.sml
Parent Directory
|
Revision Log
|
Patch
revision 394, Thu Oct 14 16:30:29 2010 UTC | revision 395, Thu Oct 14 16:52:15 2010 UTC | |
---|---|---|
# | Line 143 | Line 143 |
143 | in | in |
144 | (stms, S.E_Cons xs) | (stms, S.E_Cons xs) |
145 | end | end |
146 | | AST.E_Slice(e, indices) => let (* tensor slicing *) | |
147 | val (stms, x) = simplifyExpToVar (e, stms) | |
148 | in | |
149 | raise Fail "FIXME" | |
150 | end | |
151 | | AST.E_Cond(e1, e2, e3) => let | | AST.E_Cond(e1, e2, e3) => let |
152 | (* a conditional expression gets turned into an if-then-else statememt *) | (* a conditional expression gets turned into an if-then-else statememt *) |
153 | val result = newTemp Ty.T_Bool | val result = newTemp Ty.T_Bool |
|
root@smlnj-gforge.cs.uchicago.edu | ViewVC Help |
Powered by ViewVC 1.0.0 |