Changeset 9952


Ignore:
Timestamp:
Jul 10, 2008, 9:07:47 AM (11 years ago)
Author:
gb
Message:

BASIC-STREAM.CLASS -> BASIC-STREAM.WRAPPER.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/working-0711/ccl/library/lispequ.lisp

    r9911 r9952  
    13311331;;; "basic" (e.g., builtin, non-extensible) streams.
    13321332(def-accessors (basic-stream) %svref
    1333   basic-stream.class                    ; a class object
     1333  basic-stream.wrapper                  ; a class wrapper object
    13341334  basic-stream.flags                    ; fixnum; bits.
    13351335  basic-stream.state                    ; typically an ioblock
     
    14971497  )
    14981498
    1499   (def-accessors (afunc) %svref
    1500     ()                                    ; 'afunc
    1501     afunc-acode
    1502     afunc-parent
    1503     afunc-vars
    1504     afunc-inherited-vars
    1505     afunc-blocks
    1506     afunc-tags
    1507     afunc-inner-functions
    1508     afunc-name
    1509     afunc-bits
    1510     afunc-lfun
    1511     afunc-environment
    1512     afunc-lambdaform
    1513     afunc-argsword
    1514     afunc-ref-form
    1515     afunc-warnings
    1516     afunc-fn-refcount
    1517     afunc-fn-downward-refcount
    1518     afunc-all-vars
    1519     afunc-callers
    1520     afunc-vcells
    1521     afunc-fcells
    1522     afunc-fwd-refs
    1523     afunc-lfun-info
    1524     afunc-linkmap)
     1499(def-accessors (afunc) %svref
     1500  ()                                    ; 'afunc
     1501  afunc-acode
     1502  afunc-parent
     1503  afunc-vars
     1504  afunc-inherited-vars
     1505  afunc-blocks
     1506  afunc-tags
     1507  afunc-inner-functions
     1508  afunc-name
     1509  afunc-bits
     1510  afunc-lfun
     1511  afunc-environment
     1512  afunc-lambdaform
     1513  afunc-argsword
     1514  afunc-ref-form
     1515  afunc-warnings
     1516  afunc-fn-refcount
     1517  afunc-fn-downward-refcount
     1518  afunc-all-vars
     1519  afunc-callers
     1520  afunc-vcells
     1521  afunc-fcells
     1522  afunc-fwd-refs
     1523  afunc-lfun-info
     1524  afunc-linkmap)
    15251525
    15261526(defmacro %make-afunc ()
Note: See TracChangeset for help on using the changeset viewer.