Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] Diff of /sml/trunk/src/MLRISC/x86/mltree/x86-fp.sml
ViewVC logotype

Diff of /sml/trunk/src/MLRISC/x86/mltree/x86-fp.sml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1051, Fri Feb 1 15:04:17 2002 UTC revision 1052, Wed Feb 6 04:04:48 2002 UTC
# Line 976  Line 976 
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

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0