From e32bab94ea773880b2ada44b82ec76f089823bca Mon Sep 17 00:00:00 2001
From: ben <types@ccs.neu.edu>
Date: Sat, 9 Jan 2016 11:18:49 -0500
Subject: [PATCH] fix 'raco profile' parameter parsing

---
 profile-lib/raco.rkt | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/profile-lib/raco.rkt b/profile-lib/raco.rkt
index 16f94c6..8c89a01 100644
--- a/profile-lib/raco.rkt
+++ b/profile-lib/raco.rkt
@@ -18,13 +18,13 @@
                 [("--delay") n
                  "Sampling rate (seconds)"
                  (let ([n* (string->number n)])
-                   (unless (real? n)
+                   (unless (real? n*)
                      (raise-argument-error 'raco-profile "real?" n*))
                    (set! delay n*))]
                 [("--repeat") n
                  "Number of iterations"
                  (let ([n* (string->number n)])
-                   (unless (integer?)
+                   (unless (integer? n*)
                      (raise-argument-error 'raco-profile "integer?" n*))
                    (set! iterations n*))]
                 [("--all-threads")