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

Diff of /src/code/defstruct.lisp

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

revision 1.24 by ram, Thu Jun 6 16:36:00 1991 UTC revision 1.25 by ram, Wed Nov 6 19:20:08 1991 UTC
# Line 20  Line 20 
20  (export '(structure-index make-structure structure-length  (export '(structure-index make-structure structure-length
21            structure-ref structure-set))            structure-ref structure-set))
22    
23    ;;; Always compile safe.  This code isn't very careful about protecting itself.
24    ;;;
25    (declaim (optimize (safety 1)))
26    
27  ;;;; Structure frobbing primitives.  ;;;; Structure frobbing primitives.
28    

Legend:
Removed from v.1.24  
changed lines
  Added in v.1.25

  ViewVC Help
Powered by ViewVC 1.1.5