diff options
Diffstat (limited to 'src/interp/boot-pkg.lisp')
| -rw-r--r-- | src/interp/boot-pkg.lisp | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/interp/boot-pkg.lisp b/src/interp/boot-pkg.lisp index bad04369..b7b1cd56 100644 --- a/src/interp/boot-pkg.lisp +++ b/src/interp/boot-pkg.lisp @@ -1,6 +1,6 @@ ;; Copyright (c) 1991-2002, The Numerical Algorithms Group Ltd. ;; All rights reserved. -;; Copyright (C) 2007-2009, Gabriel Dos Reis. +;; Copyright (C) 2007-2011, Gabriel Dos Reis. ;; All rights reserved. ;; ;; Redistribution and use in source and binary forms, with or without @@ -60,6 +60,9 @@ (defun define-function (f v) (setf (symbol-function f) v))) +(defun |gensym?| (s) + (null (symbol-package s))) + ;; Below are some missing functions. There here for lack of better ;; place (sys-funs.lisp?) ;; |