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

Scheme help

Name: Anonymous 2007-12-23 19:37

(define (penis)
    (define variable (read))
    (cond
      (= (string-compare variable "penis") 0) (display "son, that's a penis"))
      (= (string-compare variable "cock") 0) (display "son, that's a cock")
      (else (display "niggerpenis"))))
(penis)

Why does this code not work, /prog/?

Name: Anonymous 2007-12-24 17:36

>>18
Reading yours, it looks confusing.

If I entered niggercock, would the code look like this?

(define (penis)
   (define variable (read))
   (case variable
      ((niggercock) (display ...))
      ...)))))))))))))

Or like this?

(define (penis)
   (define variable (read))
   (case niggercock
      ((penis) (display ...))
      ...)))))))))))))
Newer Posts
Don't change these.
Name: Email:
Entire Thread Thread List
All trademarks and copyrights on this site are owned by their respective parties. All comments and posts are the responsibility of their own posters.
- Tinychan + 2ch Mode -