Home My Page Projects Code Snippets Project Openings diderot
Summary Activity Tracker Tasks SCM

SCM Repository

[diderot] Diff of /trunk/src/compiler/IL/translate-fn.sml
ViewVC logotype

Diff of /trunk/src/compiler/IL/translate-fn.sml

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

revision 361, Wed Sep 29 14:17:34 2010 UTC revision 368, Fri Oct 1 18:17:34 2010 UTC
# Line 125  Line 125 
125    
126      fun translate (vMap, stm) = let      fun translate (vMap, stm) = let
127            val env = E{            val env = E{
128                    ndMap = Stamp.Tbl.mkTable (256, raise Fail "ndMap"),                    ndMap = Stamp.Tbl.mkTable (256, Fail "ndMap"),
129                    vMap = vMap                    vMap = vMap
130                  }                  }
131            val _ = translateNodes (env, stm)            val _ = translateNodes (env, stm)

Legend:
Removed from v.361  
changed lines
  Added in v.368

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