Need a unique gift idea?
A Pastebin account makes a great Christmas gift
SHARE
TWEET

Untitled

a guest Jan 12th, 2018 45 Never
Upgrade to PRO!
ENDING IN00days00hours00mins00secs
 
  1. (define a 3)
  2. (define define +) #makes define useless
  3. (define a 1) #outputs 4, instead of assigning 1 to a.
  4.    
  5. (define + -)
  6. (+ 1 1) #Output 0.
  7.    
  8. CL-USER 1 > (defun defun () 3)
  9.  
  10. Error: Redefining function DEFUN visible from package COMMON-LISP.
  11.   1 (continue) Redefine it anyway.
  12.   2 (abort) Return to level 0.
  13.   3 Restart top-level loop.
  14.    
  15. * (defun defun () 3)
  16.  
  17. debugger invoked on a SYMBOL-PACKAGE-LOCKED-ERROR:
  18.   Lock on package COMMON-LISP violated when proclaiming DEFUN as a function
  19.   while in package COMMON-LISP-USER.
  20. See also:
  21.   The SBCL Manual, Node "Package Locks"
  22.   The ANSI Standard, Section 11.1.2.1.2
  23.  
  24. Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL.
  25.  
  26. restarts (invokable by number or by possibly-abbreviated name):
  27.   0: [CONTINUE      ] Ignore the package lock.
  28.   1: [IGNORE-ALL    ] Ignore all package locks in the context of this operation.
  29.   2: [UNLOCK-PACKAGE] Unlock the package.
  30.   3: [ABORT         ] Exit debugger, returning to top level.
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top