SCM Repository
[diderot] Diff of /trunk/src/compiler/IL/gen/gen-ops.sml
Diff of /trunk/src/compiler/IL/gen/gen-ops.sml
Parent Directory
|
Revision Log
|
Patch
231 |
List.app (fn x => prl [",", x]) args; |
List.app (fn x => prl [",", x]) args; |
232 |
prl [")) = concat[\"", name, "<\", ", toS ty, " ", arg]; |
prl [")) = concat[\"", name, "<\", ", toS ty, " ", arg]; |
233 |
ListPair.app |
ListPair.app |
234 |
(fn (ty, x) => prl["\",\", ", toS ty, " ", arg]) |
(fn (ty, x) => prl[", \",\", ", toS ty, " ", x]) |
235 |
(tys, args); |
(tys, args); |
236 |
TextIO.output(outS, ", \">\"]\n") |
TextIO.output(outS, ", \">\"]\n") |
237 |
end |
end |
|
Legend:
Removed from v.331 |
|
changed lines |
|
Added in v.332 |
|
|