projects
/
jscl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Fix (SETF OGET).
[jscl.git]
/
src
/
boot.lisp
diff --git
a/src/boot.lisp
b/src/boot.lisp
index
821c482
..
736c07d
100644
(file)
--- a/
src/boot.lisp
+++ b/
src/boot.lisp
@@
-102,6
+102,12
@@
(defun not (x) (if x nil t))
(defun not (x) (if x nil t))
+(defun funcall (function &rest args)
+ (apply function args))
+
+(defun apply (function arg &rest args)
+ (apply function (apply #'list* arg args)))
+
;; Basic macros
(defmacro dolist ((var list &optional result) &body body)
;; Basic macros
(defmacro dolist ((var list &optional result) &body body)