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 3173, Sun Mar 29 23:39:25 2015 UTC revision 3174, Mon Mar 30 11:46:58 2015 UTC
# Line 14  Line 14 
14              fun hashint i = Word.fromInt i              fun hashint i = Word.fromInt i
15              fun iter[e]=hash e              fun iter[e]=hash e
16                | iter(e1::es)=hash e1+iter es                | iter(e1::es)=hash e1+iter es
17              fun hashMu (E.C c)=hashint c              fun hashMu (E.C c)=hashint c+0w17
18                | hashMu (E.V v)=hashint v                | hashMu (E.V v)=hashint v
19              fun hashAlpha []=0w3              fun hashAlpha []=0w3
20                | hashAlpha(e1::es)=hashMu(e1)+hashAlpha es                | hashAlpha(e1::es)=hashMu(e1)+hashAlpha es

Legend:
Removed from v.3173  
changed lines
  Added in v.3174

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