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

SCM Repository

[diderot] Diff of /branches/pure-cfg/src/compiler/mid-il/mid-il.sml
ViewVC logotype

Diff of /branches/pure-cfg/src/compiler/mid-il/mid-il.sml

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

revision 477, Sat Nov 13 16:02:07 2010 UTC revision 516, Wed Feb 9 23:10:31 2011 UTC
# Line 17  Line 17 
17      val hashty = MidILTypes.hash      val hashty = MidILTypes.hash
18      val tyToString = MidILTypes.toString      val tyToString = MidILTypes.toString
19    
20      (* required helper functions for the int type *)
21      fun sameint (i1 : int, i2) = (i1 = i2)      fun sameint (i1 : int, i2) = (i1 = i2)
22      fun hashint i = Word.fromInt i      fun hashint i = Word.fromInt i
23      fun intToString i = Int.toString i      fun intToString i = Int.toString i
24    
25      (* required helper functions for the string type *)
26      fun samestring (s1 : string, s2) = (s1 = s2)      fun samestring (s1 : string, s2) = (s1 = s2)
27      val hashstring = HashString.hashString      val hashstring = HashString.hashString
28      fun stringToString s = String.concat["\"", s, "\""]      fun stringToString s = String.concat["\"", s, "\""]

Legend:
Removed from v.477  
changed lines
  Added in v.516

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