Differences

This shows you the differences between two versions of the page.

Link to this comparison view

Both sides previous revisionPrevious revision
Next revision		Previous revision
doc:getting_started:lisp_crash_course [2022/05/04 09:15] – khoshnamdoc:getting_started:lisp_crash_course [2022/05/17 11:41] (current) – khoshnam
Line 912: Line 912:
 <code lisp> <code lisp>
 CL-USER>(setf a 10) CL-USER>(setf a 10)
-CL-USER>(if (> a 20)+CL-USER>(if (< a 20)
   (format t "~% a is less than 20")   (format t "~% a is less than 20")
  (format t "~% a is more than 20"))  (format t "~% a is more than 20"))
Line 940: Line 940:
  
 <code lisp> <code lisp>
-CL-USER>(defun *number-was-odd nil)+CL-USER>(defun *number-was-odd* nil)
  
 CL-USER>(if (oddp 5) CL-USER>(if (oddp 5)
- (progn (setf (number-was-odd t)+ (progn (setf (*number-was-odd* t)
  ‘odd-number)  ‘odd-number)
  ‘even-number)  ‘even-number)
Line 983: Line 983:
 </code> </code>
  
-<code lisp>+
  
 **defparameter** **defparameter**
 \\ \\
 +<code lisp>
 CL-USER>(defparameter *fruit* 'apple) CL-USER>(defparameter *fruit* 'apple)
 CL-USER>(cond ((eq *fruit* 'apple) 'its-an-apple) CL-USER>(cond ((eq *fruit* 'apple) 'its-an-apple)