diff options
-rw-r--r-- | test.lisp | 7 |
1 files changed, 5 insertions, 2 deletions
@@ -1,7 +1,10 @@ ;; Common Lisp -(defun gcd (a b) - (if (> b 0) (gcd b (mod a b)) a) +(require '#:package-locks) +(ext:without-package-locks + (defun gcd (a b) + (if (> b 0) (gcd b (mod a b)) a) + ) ) (princ "test") |