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

Pages: 1-

New Lisp dialect just for /prog/

Name: Anonymous 2009-08-17 16:55

Instead of parentheses, we'll use [spoiler] tags.

Name: Anonymous 2009-08-17 16:58


[spoiler]defun hello [spoiler][/spoiler]
  [spoiler]format t "Hello, world!"[/spoiler]
[/spoiler]
[spoiler]hello[/spoiler]

Name: Anonymous 2009-08-17 16:58

[spolier]How about not that.[/spoiler]

Name: Anonymous 2009-08-17 16:58

>>2
>>3

Lol, fags.

Name: Anonymous 2009-08-17 17:13

>>4
What? >>2 didn't fail, he just wrapped his code in code tags, which (apparently) doesn't work with spoiler tags.

defun hello
  format t "Hello, world!"

hello

Name: Anonymous 2009-08-17 17:20

>>5
defun hello
format t "Hello, world!"

hello

Name: Anonymous 2009-08-17 17:53

in-package :cl-user

defun bottle-song &optional in-stock 99 stream *standard-output*
  ;; Original idea by Geoff Summerhayes <sumrnot@hotmail.com>;
  ;; Formatting idea by Fred Gilham <gilham@snapdragon.csl.sri.com>;
  ;; Actual formatting & minor recoding by Kent M Pitman
  ;;   <pitman@world.std.com>;
  ;; Redone for conformance to <http://www.99-bottles-of-beer.net/>;
  ;;   by Michael Weber <michaelw@foldr.org>;.
  format

              stream
            "~v{~1&~0%~
             ~000000%~
             ~000000%~
             ~000000%~
            ~00000000%~
           ~:/bottles/ ~
         of beer on ~000%~
         the wall, ~001:*~
         ~99/bottles/ of ~
         beer.~1:*~%~[Go ~
         to the store and~
         ~000@* buy some ~
         more, ~/bottles/~
         ~00% of beer on ~
         the wall.~01%~:;~
         Take one down an~
         d pass it around~
         , ~999/bottles/ ~
         ~:*of beer on th~
         e wall.~002%~]~}"
           1+ in-stock

   loop for bottle from in-stock downto 0 collect bottle


defun bottles stream arg &optional colonp atp &rest args
  declare ignore atp args
  format stream "~[~:[n~;N~]o more bottles~:;~:*~A bottle~:*~P~]"
          arg colonp


bottle-song

Name: ​​​​​​​​​​ 2010-10-22 11:49

Name: Anonymous 2013-01-19 23:18

/prog/ will be spammed continuously until further notice. we apologize for any inconvenience this may cause.

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