SCM Repository
[diderot] Diff of /branches/pure-cfg/src/compiler/codegen/low-to-tree.sml
Diff of /branches/pure-cfg/src/compiler/codegen/low-to-tree.sml
Parent Directory
|
Revision Log
|
Patch
195 |
in |
in |
196 |
(env, [T.S_LoadVoxels(t, n, useVar env a)]) |
(env, [T.S_LoadVoxels(t, n, useVar env a)]) |
197 |
end |
end |
198 |
| IL.OP(Op.MulMatMat(d1, d2, d3), [m1, m2]) => raise Fail "matrix-matrix multiply" |
| IL.OP(rator as Op.MulMatMat _, args) => let |
199 |
|
(* operations that return matrices may not be supported inline *) |
200 |
|
val (env, t) = doLHS() |
201 |
|
in |
202 |
|
(env, [T.S_Assign(t, T.E_Op(rator, List.map (useVar env) args))]) |
203 |
|
end |
204 |
| IL.OP(rator, args) => |
| IL.OP(rator, args) => |
205 |
bind (env, lhs, T.E_Op(rator, List.map (useVar env) args)) |
bind (env, lhs, T.E_Op(rator, List.map (useVar env) args)) |
206 |
| IL.APPLY(f, args) => |
| IL.APPLY(f, args) => |
|
Legend:
Removed from v.809 |
|
changed lines |
|
Added in v.810 |
|
|