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/compiler/FLINT/clos/unrebind.sml
ViewVC logotype

Diff of /sml/trunk/src/compiler/FLINT/clos/unrebind.sml

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

revision 1173, Sat Mar 23 04:18:51 2002 UTC revision 1174, Sat Mar 23 21:14:40 2002 UTC
# Line 70  Line 70 
70                  | LOOKER(i,vl,w,t,e) => LOOKER(i,map rename vl,w,t,h e)                  | LOOKER(i,vl,w,t,e) => LOOKER(i,map rename vl,w,t,h e)
71                  | ARITH(i,vl,w,t,e) => ARITH(i,map rename vl,w,t,h e)                  | ARITH(i,vl,w,t,e) => ARITH(i,map rename vl,w,t,h e)
72                  | PURE(i,vl,w,t,e) => PURE(i,map rename vl,w,t,h e)                  | PURE(i,vl,w,t,e) => PURE(i,map rename vl,w,t,h e)
73                  | RCC(p,vl,w,t,e) => RCC(p, map rename vl, w, t, h e)                  | RCC(k,l,p,vl,w,t,e) => RCC(k, l, p, map rename vl, w, t, h e)
74         in  h         in  h
75        end        end
76    

Legend:
Removed from v.1173  
changed lines
  Added in v.1174

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