Databases
StackOverflow2013
Postsdbo
POInteger Value is Not a Number in Common Lisp?
 

Note that there are some explanatory texts on larger screens.

plurals
  1. POInteger Value is Not a Number in Common Lisp?
    primarykey
    data
    text
    <p>When I execute the following Common Lisp program by calling <code>(play)</code>, I get the error: <code>Argument X is not a NUMBER: Guess</code></p> <pre><code>;;;; number-game.lisp ;;;; ;;;; Andrew Levenson ;;;; 10/25/2010 ;;;; ;;;; Simple number guessing game. User has ;;;; five guesses to determine a number between ;;;; one and one hundred, inclusive (1-100). ;;; Set global variable for the target number: (defparameter *target* nil) ;;; Set the iterator so we may check the number of guesses (defparameter *number-of-guesses* 0) ;;; Welcome the user (defun welcome-user () (format t "Welcome to the number guessing game!~%")) ;;; Prompt for a guess (defun prompt-for-guess () (format t "Please enter your guess (1-100): ") (finish-output nil) ; nil directs finish-output to standard IO (check-guess 'read-guess)) ;;; Read in a guess (defun read-guess () (let ((guess (parse-integer(read-line *query-io*)))) (if (numberp guess) ; If true, return guess. Else, call prompt-for-guess (progn (setq *number-of-guesses* (+ *number-of-guesses* 1)) 'guess) (prompt-for-guess)))) ;;; Check if the guess is higher than, lower than, or equal to, the target (defun check-guess (fn) (let ((guess (funcall fn))) (if (= guess *target*) (equal-to) (if (&gt; guess *target*) (greater-than (guess)) (if (&lt; guess *target*) (less-than (guess))))))) ;;; If the guess is equal to the target, the game is over (defun equal-to () (format t "Congratulations! You have guessed the target number, ~a!~%" *target*) (y-or-n-p "Play again? [y/n] ")) ;;; If the guess is greater than the target, inform the player. (defun greater-than (guess) (format t "Sorry, ~a is greater than the target.~%" guess) (if (&lt; *number-of-guesses* 6) (prompt-for-guess) (game-over))) ;;; If the guess is less than the target, inform the player. (defun less-than (guess) (format t "Sorry, ~a is less than the target.~%" guess) (if (&lt; *number-of-guesses* 6) (prompt-for-guess) (game-over))) ;;; If the player has run out of guesses, give them the option ;;; of playing the game again. (defun game-over () (y-or-n-p "You have run out of guesses. Play again? [y/n] ")) ;;; Play the game (defun play () ;; If it's their first time playing this session, ;; make sure to greet the user. (unless (&gt; *number-of-guesses* 0) (welcome-user)) ;; Reset their remaining guesses (setq *number-of-guesses* 0) ;; Set the target value (setq *target* ;; Random can return float values, ;; so we must round the result to get ;; an integer value. (round ;; Add one to the result, because ;; (random 100) yields a number between ;; 0 and 99, whereas we want a number ;; from 1 to 100 inclusive. (+ (random 100) 1))) (if (equal (prompt-for-guess) "y") (play) (quit))) </code></pre> <p>What am I doing wrong that <code>guess</code> is not a number value in <code>check-guess</code>?</p>
    singulars
    1. PO
      singulars
      1. PTAnswer
    1. This table or related slice is empty.
    1. PTQuestion
    1. USMarc Mutz - mmutz
    1. USAndy
    plurals
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. PO
      singulars
      1. PTAnswer
    1. VO
      singulars
      1. POInteger Value is Not a Number in Common Lisp?
      1. This table or related slice is empty.
      1. VTUpMod
    2. VO
      singulars
      1. POInteger Value is Not a Number in Common Lisp?
      1. This table or related slice is empty.
      1. VTUpMod
    1. COTo save some time: at what line do you get that error?
      singulars
      1. POInteger Value is Not a Number in Common Lisp?
      1. USRing Ø
    2. COIf you try to reduce the amount of code that shows the error to a manageable amount, you might learn something about diagnostics in the process.
      singulars
      1. POInteger Value is Not a Number in Common Lisp?
      1. USGreg Hewgill
    3. CO@ring0 Sorry, but I don't know how to get line numbers out of the REPL errors. :/
      singulars
      1. POInteger Value is Not a Number in Common Lisp?
      1. USAndy
 

Querying!

 
Guidance
A row detail

Detail views are divided into sections. All the information in the data section comes from columns in the selected row. The other sections display data from other, related rows.

Related data can be related in a to-one or a to-many fashion. Captions of data related in a to-many fashion link to a list view showing a filtered view of the table.

Try moving around until you find a non-empty to-many entry and click on the label to get to one. You can move back to the root by clicking on the database name in the header.

SQuiL has stopped working due to an internal error.

If you are curious you may find further information in the browser console, which is accessible through the devtools (F12).

Reload