Changeset 11878


Ignore:
Timestamp:
05/16/09 07:26:03 (9 years ago)
Author:
ehuelsmann
Message:

Add structure slot documentation.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/abcl/src/org/armedbear/lisp/jvm.lisp

    r11871 r11878  
    154154(defstruct compiland
    155155  name
    156   (kind :external) ; :INTERNAL or :EXTERNAL
     156  (kind :external)  ; :INTERNAL or :EXTERNAL
    157157  lambda-expression
    158   arg-vars
    159   free-specials
    160   arity ; NIL if the number of args can vary.
    161   p1-result
    162   parent
    163   (children 0 :type fixnum) ; Number of local functions defined with FLET or LABELS.
     158  arg-vars          ; variables for lambda arguments
     159  free-specials     ;
     160  arity             ; number of args, or NIL if the number of args can vary.
     161  p1-result         ; the parse tree as created in pass 1
     162  parent            ; the parent for compilands which defined within another
     163  (children 0       ; Number of local functions
     164            :type fixnum) ; defined with with FLET, LABELS or LAMBDA
    164165  argument-register
    165166  closure-register
     
    328329  compiland
    329330  inline-expansion
    330   function
     331  function  ;; the function loaded through load-compiled-function
    331332  class-file
    332   variable)
     333  variable  ;; the variable which contains the loaded compiled function
     334            ;; or compiled closure
     335  )
    333336
    334337(defvar *local-functions* ())
Note: See TracChangeset for help on using the changeset viewer.