/[cmucl]/src/code/hash.lisp
ViewVC logotype

Diff of /src/code/hash.lisp

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

revision 1.3 by ram, Thu Oct 4 14:36:09 1990 UTC revision 1.4 by wlott, Wed Oct 10 16:31:23 1990 UTC
# Line 419  Line 419 
419      (list (sxhash-list s-expr depth))      (list (sxhash-list s-expr depth))
420      (fixnum      (fixnum
421       (ldb sxhash-bits-byte s-expr))       (ldb sxhash-bits-byte s-expr))
422      #+nil      (structure
423      (structure ???)       (internal-sxhash (type-of s-expr) depth))
424      ;; Other-pointer types.      ;; Other-pointer types.
425      (simple-string (sxhash-simple-string s-expr))      (simple-string (sxhash-simple-string s-expr))
426      (symbol (sxhash-simple-string (symbol-name s-expr)))      (symbol (sxhash-simple-string (symbol-name s-expr)))

Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4

  ViewVC Help
Powered by ViewVC 1.1.5