Return Styles: Pseud0ch, Terminal, Valhalla, NES, Geocities, Blue Moon.

Pages: 1-

post ITT if you love LISP!!!

Name: Anonymous 2013-05-06 3:27

at first i was like muh parentheses is shit wtf?
but now i get it its totally awesome!! u can do anything u want with LISP! thx /prog/!

Name: Anonymous 2013-05-06 4:58

That's not how you point to your tinfoil hat.

Name: Anonymous 2013-05-06 7:39

Can you tell me how to get it to fix these shit saints on my toilet? I've scrubbed but they just don't come off.

Name: Anonymous 2013-05-06 9:56

I write Lisp and it has little parentheses. What am I doing wrong?


(to /num
  ! cond
  ! ! digit? (/top-char)
  ! ! ! rec r i t
              ys nil
  ! ! ! ! y = (/top-char)
  ! ! ! ! cond
  ! ! ! ! ! and (eql y #\.) i (digit? (second /in)) :> r nil (cons (/next-char) ys)
  ! ! ! ! ! digit? y :> r i (cons (/next-char) ys)
  ! ! ! ! ! or t :> read-from-string (coerce (nreverse ys) 'string)
  ! ! eq (/top-char) #\#
  ! ! ! /expect #\#
  ! ! ! when eq (/top-char) #\{ :> return-from /num (list "#" (snd (/list)))
  ! ! ! when /sym-body? (/top-char)
  ! ! ! ! s = coerce (/take-prefix #'/sym-body?) 'string
  ! ! ! ! when hex-digit? (aref s 0) :> return-from /num (read-from-string (concatenate 'string "#x" s))
  ! ! ! ! when string= s "yes" :> return-from /num :yes
  ! ! ! ! when string= s "no" :> return-from /num :no
  ! ! ! ! when string= s "void" :> return-from /num :void
  ! ! ! ! /error "`#{s}` is unexpected"
  ! ! ! /error "`#{(/top-char)}` is unexpected"
  ! ! or t :> :fail)

Name: Anonymous 2013-05-06 10:03

ONE WORD: /VALID FORCED EXCLAMATION INDENTATION OF THE CODE, THREAD OVER/

Don't change these.
Name: Email:
Entire Thread Thread List