SCM Repository
[diderot] Diff of /branches/pure-cfg/src/compiler/codegen/codegen-fn.sml
Diff of /branches/pure-cfg/src/compiler/codegen/codegen-fn.sml
Parent Directory
| 
Revision Log
| 
Patch
| 224 |
doNode (vtbl, fn _ => raise Fail "bogus ifCont at JOIN node", [], CFG.entry cfg) |
doNode (vtbl, fn _ => raise Fail "bogus ifCont at JOIN node", [], CFG.entry cfg) |
| 225 |
end |
end |
| 226 |
|
|
| 227 |
fun generate (fileStem, IL.Program{globals, globalInit, strands}) = () |
fun generate (fileStem, IL.Program{globals, globalInit, strands}) = let |
| 228 |
|
val prog = T.newProgram () |
| 229 |
|
in |
| 230 |
|
T.generate (fileStem, prog) |
| 231 |
|
end |
| 232 |
|
|
| 233 |
end |
end |
|
|
Legend:
| Removed from v.526 |
|
| changed lines |
| |
Added in v.527 |
|
|
