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

SCM Repository

[diderot] Diff of /branches/lamont/src/compiler/IL/census-fn.sml
ViewVC logotype

Diff of /branches/lamont/src/compiler/IL/census-fn.sml

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

revision 2161, Wed Feb 20 04:32:27 2013 UTC revision 2162, Thu Feb 21 04:59:17 2013 UTC
# Line 26  Line 26 
26            fun clearVar (IL.V{name,useCnt, ...}) = (case name            fun clearVar (IL.V{name,useCnt, ...}) = (case name
27                  of "qCellDim" => useCnt := 1  (* HACK: Need to keep grid cell/dimensions around so they can be used  during runtime*)                  of "qCellDim" => useCnt := 1  (* HACK: Need to keep grid cell/dimensions around so they can be used  during runtime*)
28                   | "qGridDim" => useCnt := 1                   | "qGridDim" => useCnt := 1
29                     | "qWinDim"  => useCnt := 1
30                   | _ => useCnt := 0                   | _ => useCnt := 0
31               (* end case *))               (* end case *))
32          (* clear the counts of the variables defined in a node *)          (* clear the counts of the variables defined in a node *)

Legend:
Removed from v.2161  
changed lines
  Added in v.2162

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