diff --git a/index.md b/index.md index 7a71e72..df59e54 100644 --- a/index.md +++ b/index.md @@ -63,21 +63,22 @@ typos" to a whole new article. Anyways, I hope it helps you. ![](/satania.png) -
(defconstant NUMBER_OF_PEOPLE 10)
-(defvar *i* 0)
+~~~{.commonlisp}
 
-(defun rewrite (n) n)
-(defun memory (n) n)
 
-(format t "Beginning system reset.....")
-(if (y-or-n-p "ALL RESET?")
-    (loop while (<= *i* NUMBER_OF_PEOPLE)
+(defconstant NUMBER_OF_PEOPLE 10)
+(defvar *i* 0)
+
+(defun rewrite (n) n)
+(defun memory (n) n)
+
+(format t "Beginning system reset.....")
+(if (y-or-n-p "ALL RESET?")
+    (loop while (<= *i* NUMBER_OF_PEOPLE)
        do
-	 (rewrite (memory *i*))
-	 (defparameter *i* (1+ *i*))))
-
-
- + (rewrite (memory *i*)) + (defparameter *i* (1+ *i*)))) +~~~ car car car car cdr cdr cdr cdr car cdr eval apply car cdr eval apply car cdr eval apply car cdr eval apply car cdr eval apply car cdr eval apply