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

SCM Repository

[diderot] Diff of /branches/vis15/src/compiler/tree-ir/tree-global-var.sml
ViewVC logotype

Diff of /branches/vis15/src/compiler/tree-ir/tree-global-var.sml

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

revision 3895, Sun May 22 17:54:44 2016 UTC revision 3896, Sun May 22 18:24:49 2016 UTC
# Line 25  Line 25 
25    
26      val ty : t -> TreeTypes.t      val ty : t -> TreeTypes.t
27    
28        val apiTy : t -> APITypes.t
29    
30      val isInput : t -> bool      val isInput : t -> bool
31      val isOutput : t -> bool      val isOutput : t -> bool
32      val isVarying : t -> bool      val isVarying : t -> bool
# Line 48  Line 50 
50    
51      fun ty (GV{ty, ...}) = ty      fun ty (GV{ty, ...}) = ty
52    
53        fun apiTy (GV{xty = SOME ty, ...}) = ty
54          | apiTy (GV{name, ...}) = raise Fail("missing API Type for global " ^ name)
55    
56      fun isInput (GV{input, ...}) = input      fun isInput (GV{input, ...}) = input
57      fun isOutput (GV{output, ...}) = output      fun isOutput (GV{output, ...}) = output
58      fun isVarying (GV{varying, ...}) = varying      fun isVarying (GV{varying, ...}) = varying

Legend:
Removed from v.3895  
changed lines
  Added in v.3896

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