Changeset 7307 in project


Ignore:
Timestamp:
01/08/08 09:04:25 (12 years ago)
Author:
felix winkelmann
Message:

fixed bug in blob=?

File:
1 edited

Legend:

Unmodified
Added
Removed
  • chicken/trunk/library.scm

    r7306 r7307  
    12141214  (let ((n (##sys#size b1)))
    12151215    (and (eq? (##sys#size b2) n)
    1216          (##core#inline "C_string_compare" b1 b2 n))))
     1216         (zero? (##core#inline "C_string_compare" b1 b2 n)))))
    12171217
    12181218
Note: See TracChangeset for help on using the changeset viewer.