X-Git-Url: https://code.consxy.com/gitweb/gitweb.cgi?p=sheep;a=blobdiff_plain;f=resources%2Fsuccess1.lisp;h=3e33e13298c4f1359678d21b5bbebeea2300d77b;hp=716dda6e8429c872f37aca487185fc3537b5a433;hb=0d2cc28;hpb=2d880c9656734ae0ae9f18b9b8e9a889236e38f8

diff --git a/resources/success1.lisp b/resources/success1.lisp
index 716dda6..3e33e13 100644
--- a/resources/success1.lisp
+++ b/resources/success1.lisp
@@ -5,12 +5,35 @@
 This is should all get pulled in and the markdown.md should be equal
 to success1.md.")
  (:export
+  #:*special-variable*
   #:test-condition
   #:func-that-does-stuff #:noargs #:result-list #:has-no-examples
   #:values-result #:has-optional #:has-keywords #:has-rest))
 
 (in-package #:success1)
 
+(defvar *special-variable* nil
+ "*SPECIAL-VARIABLE*
+
+VALUE TYPE:
+
+  a generalized boolean
+
+INITIAL VALUE:
+
+  NIL
+
+DESCRIPTION:
+
+  It is special, and a boolean.
+
+  When true, it satisfies if coniditions.  When NIL, it does not.
+  That may make it seem like it's not very special, but it is.
+
+EXAMPLES:
+
+  (let ((*special-variable* t)) (go)) => 'let-it-go")
+
 (define-condition test-condition nil nil
  (:documentation
   "Simple documentation.