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

SCM Repository

[diderot] Diff of /branches/charisee/src/compiler/ein/hash-ein.sml
ViewVC logotype

Diff of /branches/charisee/src/compiler/ein/hash-ein.sml

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

revision 2552, Fri Feb 28 19:03:27 2014 UTC revision 2553, Sun Mar 2 19:53:33 2014 UTC
# Line 7  Line 7 
7  (*hash value of the expression *)  (*hash value of the expression *)
8  fun hashfn(Ein.EIN{params, index, body})= let  fun hashfn(Ein.EIN{params, index, body})= let
9     val changed =ref false     val changed =ref false
10        val g=print "Made it to hash function\n\n"
12     fun hash(body)=(case body     fun hash(body)=(case body
13          of E.Const _ =>  0w3          of E.Const _ =>  0w3

Removed from v.2552  
changed lines
  Added in v.2553

ViewVC Help
Powered by ViewVC 1.0.0