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

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

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

revision 1174, Sat Mar 23 21:14:40 2002 UTC revision 1755, Thu Feb 10 23:54:06 2005 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(k,l,p,vl,w,t,e) => RCC(k, l, p, map rename vl, w, t, h e)                  | RCC(k,l,p,vl,wtl,e) => RCC(k, l, p, map rename vl, wtl, h e)
74         in  h         in  h
75        end        end
76    

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

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