Warning: Parameter 3 to processSchemeCodeTag() expected to be a reference, value given in /Users/gambit/Sites/wiki/includes/parser/Parser.php on line 3333
Script:Games:guess-number.scm - Gambit wiki

Script:Games:guess-number.scm

From Gambit wiki

(Difference between revisions)
Jump to: navigation, search
(Script:Games:guess-number.scm)
(Script:Games:guess-number.scm)
Line 1: Line 1:
-
<schemecode>;; Games:guess-number.scm
+
<schemecode>;;; Games:guess-number.scm
 +
 
 +
;; Games:guess-number.scm
;;
;;
;; Author: Marc Feeley <feeley@iro.umontreal.ca>
;; Author: Marc Feeley <feeley@iro.umontreal.ca>
Line 15: Line 17:
(define (guess-number-loop number nb-guesses)
(define (guess-number-loop number nb-guesses)
-
   (print "What is you guess? ")
+
   (print "What is you guess\n? ")
   (let ((n (read)))
   (let ((n (read)))
     (if (= n number)
     (if (= n number)

Revision as of 22:55, 22 December 2014

Personal tools
documentation