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

SCM Repository

[diderot] Diff of /branches/vis12/src/compiler/high-il/high-il.sml
ViewVC logotype

Diff of /branches/vis12/src/compiler/high-il/high-il.sml

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

revision 2983, Fri Mar 6 23:16:15 2015 UTC revision 2984, Sat Mar 7 00:05:29 2015 UTC
# Line 113  Line 113 
113        | DiffField        | DiffField
114        | CurlField of int        | CurlField of int
115        | ImageDim of ImageInfo.info * int        | ImageDim of ImageInfo.info * int
116        | BorderCtlValue of ImageInfo.info        | BorderCtlDefault of ImageInfo.info
117        | BorderCtlClamp of ImageInfo.info        | BorderCtlClamp of ImageInfo.info
118        | BorderCtlMirror of ImageInfo.info        | BorderCtlMirror of ImageInfo.info
119        | BorderCtlWrap of ImageInfo.info        | BorderCtlWrap of ImageInfo.info
# Line 187  Line 187 
187        | resultArity DiffField = 1        | resultArity DiffField = 1
188        | resultArity (CurlField _) = 1        | resultArity (CurlField _) = 1
189        | resultArity (ImageDim _) = 1        | resultArity (ImageDim _) = 1
190        | resultArity (BorderCtlValue _) = 1        | resultArity (BorderCtlDefault _) = 1
191        | resultArity (BorderCtlClamp _) = 1        | resultArity (BorderCtlClamp _) = 1
192        | resultArity (BorderCtlMirror _) = 1        | resultArity (BorderCtlMirror _) = 1
193        | resultArity (BorderCtlWrap _) = 1        | resultArity (BorderCtlWrap _) = 1
# Line 261  Line 261 
261        | arity DiffField = 1        | arity DiffField = 1
262        | arity (CurlField _) = 1        | arity (CurlField _) = 1
263        | arity (ImageDim _) = 1        | arity (ImageDim _) = 1
264        | arity (BorderCtlValue _) = 2        | arity (BorderCtlDefault _) = 2
265        | arity (BorderCtlClamp _) = 1        | arity (BorderCtlClamp _) = 1
266        | arity (BorderCtlMirror _) = 1        | arity (BorderCtlMirror _) = 1
267        | arity (BorderCtlWrap _) = 1        | arity (BorderCtlWrap _) = 1
# Line 344  Line 344 
344        | same (DiffField, DiffField) = true        | same (DiffField, DiffField) = true
345        | same (CurlField(a0), CurlField(b0)) = sameint(a0, b0)        | same (CurlField(a0), CurlField(b0)) = sameint(a0, b0)
346        | same (ImageDim(a0,a1), ImageDim(b0,b1)) = ImageInfo.same(a0, b0) andalso sameint(a1, b1)        | same (ImageDim(a0,a1), ImageDim(b0,b1)) = ImageInfo.same(a0, b0) andalso sameint(a1, b1)
347        | same (BorderCtlValue(a0), BorderCtlValue(b0)) = ImageInfo.same(a0, b0)        | same (BorderCtlDefault(a0), BorderCtlDefault(b0)) = ImageInfo.same(a0, b0)
348        | same (BorderCtlClamp(a0), BorderCtlClamp(b0)) = ImageInfo.same(a0, b0)        | same (BorderCtlClamp(a0), BorderCtlClamp(b0)) = ImageInfo.same(a0, b0)
349        | same (BorderCtlMirror(a0), BorderCtlMirror(b0)) = ImageInfo.same(a0, b0)        | same (BorderCtlMirror(a0), BorderCtlMirror(b0)) = ImageInfo.same(a0, b0)
350        | same (BorderCtlWrap(a0), BorderCtlWrap(b0)) = ImageInfo.same(a0, b0)        | same (BorderCtlWrap(a0), BorderCtlWrap(b0)) = ImageInfo.same(a0, b0)
# Line 419  Line 419 
419        | hash DiffField = 0w307        | hash DiffField = 0w307
420        | hash (CurlField(a0)) = 0w311 + hashint a0        | hash (CurlField(a0)) = 0w311 + hashint a0
421        | hash (ImageDim(a0,a1)) = 0w313 + ImageInfo.hash a0 + hashint a1        | hash (ImageDim(a0,a1)) = 0w313 + ImageInfo.hash a0 + hashint a1
422        | hash (BorderCtlValue(a0)) = 0w317 + ImageInfo.hash a0        | hash (BorderCtlDefault(a0)) = 0w317 + ImageInfo.hash a0
423        | hash (BorderCtlClamp(a0)) = 0w331 + ImageInfo.hash a0        | hash (BorderCtlClamp(a0)) = 0w331 + ImageInfo.hash a0
424        | hash (BorderCtlMirror(a0)) = 0w337 + ImageInfo.hash a0        | hash (BorderCtlMirror(a0)) = 0w337 + ImageInfo.hash a0
425        | hash (BorderCtlWrap(a0)) = 0w347 + ImageInfo.hash a0        | hash (BorderCtlWrap(a0)) = 0w347 + ImageInfo.hash a0
# Line 493  Line 493 
493        | toString DiffField = "DiffField"        | toString DiffField = "DiffField"
494        | toString (CurlField(a0)) = concat["CurlField<", intToString a0, ">"]        | toString (CurlField(a0)) = concat["CurlField<", intToString a0, ">"]
495        | toString (ImageDim(a0,a1)) = concat["ImageDim<", ImageInfo.toString a0, ",", intToString a1, ">"]        | toString (ImageDim(a0,a1)) = concat["ImageDim<", ImageInfo.toString a0, ",", intToString a1, ">"]
496        | toString (BorderCtlValue(a0)) = concat["BorderCtlValue<", ImageInfo.toString a0, ">"]        | toString (BorderCtlDefault(a0)) = concat["BorderCtlDefault<", ImageInfo.toString a0, ">"]
497        | toString (BorderCtlClamp(a0)) = concat["BorderCtlClamp<", ImageInfo.toString a0, ">"]        | toString (BorderCtlClamp(a0)) = concat["BorderCtlClamp<", ImageInfo.toString a0, ">"]
498        | toString (BorderCtlMirror(a0)) = concat["BorderCtlMirror<", ImageInfo.toString a0, ">"]        | toString (BorderCtlMirror(a0)) = concat["BorderCtlMirror<", ImageInfo.toString a0, ">"]
499        | toString (BorderCtlWrap(a0)) = concat["BorderCtlWrap<", ImageInfo.toString a0, ">"]        | toString (BorderCtlWrap(a0)) = concat["BorderCtlWrap<", ImageInfo.toString a0, ">"]

Legend:
Removed from v.2983  
changed lines
  Added in v.2984

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