These are probably wrong.

#66
romance-ii · Nov 23, 2016 · ca6699a · ca6699a
1 parent 9aa44eb
commit ca6699a
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/compiler/compiler.lisp b/src/compiler/compiler.lisp
@@ -1243,10 +1243,10 @@ generate the code which performs the transformation on these variables."
 (define-builtin boundp (x)
   (convert-to-bool `(!== (get ,x "value") undefined)))
 
-(define-builtin fboundp (x)
+(define-builtin fboundp (x)             ; FIXME: unboundFunction
   (convert-to-bool `(!== (get ,x "fvalue") undefined)))
 
-(define-builtin %fboundp-setf (x)
+(define-builtin %fboundp-setf (x)       ; FIXME: unboundSetFFunction
   (convert-to-bool `(!== (get ,x "setfValue") undefined)))
 
 (define-builtin symbol-value (x)