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

SCM Repository

[diderot] Diff of /trunk/src/compiler/mid-il/check-mid-il.sml
ViewVC logotype

Diff of /trunk/src/compiler/mid-il/check-mid-il.sml

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

revision 1295, Thu Jun 9 06:42:54 2011 UTC revision 1301, Thu Jun 9 23:58:40 2011 UTC
# Line 72  Line 72 
72              | Op.EvalKernel(d, _, _) => (Ty.vecTy d, [Ty.vecTy d])              | Op.EvalKernel(d, _, _) => (Ty.vecTy d, [Ty.vecTy d])
73              | Op.LoadImage info => (Ty.ImageTy info, [Ty.StringTy])              | Op.LoadImage info => (Ty.ImageTy info, [Ty.StringTy])
74              | Op.Inside(info, _) => (Ty.BoolTy, [Ty.vecTy(ImageInfo.dim info), Ty.ImageTy info])              | Op.Inside(info, _) => (Ty.BoolTy, [Ty.vecTy(ImageInfo.dim info), Ty.ImageTy info])
75              | Op.Input(ty, _) => (ty, [])              | Op.Input(ty, _, _) => (ty, [])
76              | Op.InputWithDefault(ty, _) => (ty, [ty])              | Op.InputWithDefault(ty, _, _) => (ty, [ty])
77              | _ => raise Fail("sigOf: invalid operator " ^ Op.toString rator)              | _ => raise Fail("sigOf: invalid operator " ^ Op.toString rator)
78            (* end case *))            (* end case *))
79    

Legend:
Removed from v.1295  
changed lines
  Added in v.1301

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