author | Alan Dipert
<alan@dipert.org> 2020-04-03 06:18:29 UTC |
committer | Alan Dipert
<alan@dipert.org> 2020-04-03 06:18:29 UTC |
parent | 37091b8f198ab51f69f7455145038cadbf9838de |
boot.lisp | +1 | -2 |
diff --git a/boot.lisp b/boot.lisp index 85d1a41..4118cab 100644 --- a/boot.lisp +++ b/boot.lisp @@ -243,7 +243,7 @@ (defun zerop (x) (when (not (numberp x)) (%type-error "number")) (jacl:%js "~{}===0?true:null" x)) - + (defun %> (x y) (when (not (numberp x)) (%type-error "number")) (when (not (numberp y)) (%type-error "number")) @@ -311,4 +311,3 @@ (%let ((cl-user-pkg (\. (%js "Package") (|get| (\. '#:common-lisp-user |name|))))) (\. cl-user-pkg (|usePackage| cl:*package*)) (%setq cl:*package* cl-user-pkg)) -