SCM Repository
[smlnj] Diff of /sml/trunk/src/MLRISC/x86/mltree/x86-fp.sml
Diff of /sml/trunk/src/MLRISC/x86/mltree/x86-fp.sml
Parent Directory
|
Revision Log
|
Patch
976 |
} |
} |
977 |
]) |
]) |
978 |
| gen((n,e)::rest, h, all as (NEWEDGE{entries, ...}::_)) = |
| gen((n,e)::rest, h, all as (NEWEDGE{entries, ...}::_)) = |
979 |
gen(rest,h, |
gen(rest,n, |
980 |
if n = h then |
if n = h then |
981 |
(entries := e :: !entries; all) |
(entries := e :: !entries; all) |
982 |
else |
else |
|
Legend:
Removed from v.1051 |
|
changed lines |
|
Added in v.1052 |
|
|