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

SCM Repository

[diderot] Diff of /branches/vis12/src/compiler/ast/var.sml
ViewVC logotype

Diff of /branches/vis12/src/compiler/ast/var.sml

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

revision 2651, Thu May 29 21:31:37 2014 UTC revision 2652, Thu May 29 23:14:49 2014 UTC
# Line 45  Line 45 
45      fun same (V{id=a, ...}, V{id=b, ...}) = Stamp.same(a, b)      fun same (V{id=a, ...}, V{id=b, ...}) = Stamp.same(a, b)
46      fun hash (V{id, ...}) = Stamp.hash id      fun hash (V{id, ...}) = Stamp.hash id
47    
48        fun kindToString (V{kind, ...}) = (case kind
49              of BasisVar => "basis variable"
50               | InputVar => "input variable"
51               | GlobalVar => "global variable"
52               | FunVar => "function"
53               | StrandParam => "strand parameter"
54               | StrandStateVar => "state variable"
55               | StrandOutputVar => "strand output variable"
56               | LocalVar => "variable"
57              (* end case *))
58    
59      local      local
60        structure V =        structure V =
61          struct          struct

Legend:
Removed from v.2651  
changed lines
  Added in v.2652

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