diff src/requests.tp @ 48:855c05c9cae1

Updated myproblems.json. Some solver fixes
author Mike Pavone <pavone@retrodev.com>
date Sun, 11 Aug 2013 04:03:51 -0700
parents e9e01cd64993
children 8409af16d6e5
line wrap: on
line diff
--- a/src/requests.tp	Sun Aug 11 02:35:40 2013 -0700
+++ b/src/requests.tp	Sun Aug 11 04:03:51 2013 -0700
@@ -184,11 +184,12 @@
 		_ops <- decoded get: "operators" withDefault: #[]
 		_timeLeft <- decoded get: "timeLeft" withDefault: 301
 		_challenge <- decoded get: "challenge" withDefault: ""
+		_solved <- decoded get: "solved" withDefault: false
 		#{
 			id <- { _id }
 			size <- { _size }
 			operators <- { _ops }
-			//solved <- decoded get: "solved" withDefault: false // todo: B ool up ean  this son of a j
+			solved <- { _solved }
 			timeLeft <- { _timeLeft }
 			// training problems have a challenge, real ones do not.:
 			challenge <- { _challenge }
@@ -197,6 +198,7 @@
 						foreach: operators :idx val {
 							str <- str . "\n  " . (string: idx) . ": " . val
 						}
+						str <- str . "\nsolved?: " . (if: solved { "true" } else: { "false" })
 						str . "\ntimeLeft: " . timeLeft
 			}
 			print <- {
@@ -213,7 +215,9 @@
 	problems <- :bod {
 		decoded <- json decode: bod
 		decoded map: :el{
-			_problem: el
+			p <- _problem: el
+			//print: p
+			p
 		}
 	}