bootstrap

diff church/runtime/hashtable.state @ 841:f32bc9d22355

Added tag alpha-7 for changeset f5417ff321cb
author John Leuner <jewel@subvert-the-dominant-paradigm.net>
date Sat Oct 01 10:32:51 2011 +0200 (7 months ago)
parents f172f7b54064
children 9ec3d595e7c3
line diff
     1.1 --- a/church/runtime/hashtable.state	Mon Sep 12 21:36:42 2011 +0200
     1.2 +++ b/church/runtime/hashtable.state	Sat Oct 01 10:32:51 2011 +0200
     1.3 @@ -423,7 +423,7 @@
     1.4  						 (set-long! hash-table (* (+ index 1) CHURCH_WORD_SIZE) key2)
     1.5  						 (set-long! hash-table (* (+ index 2) CHURCH_WORD_SIZE) value1)
     1.6  						 (set-long! hash-table (* (+ index 3) CHURCH_WORD_SIZE) value2)					     					     					     
     1.7 -						 (return 0) ; new entry
     1.8 +						 (return 0) ; existing entry
     1.9  						 ))))
    1.10  ;				      (call-c-extern printf "add key1 %p key2 %p, h %p index %lu at index %lu (%p) PROBING
    1.11  ;" key1 key2 h index index index)