                                                     [])]
                        (let [final-state (run-push (:program individual)
                                                    (->> (make-push-state)
-                                                     (push-item input :input)
-                                                     (push-item "" :output)))
-                             result (stack-ref :output 0 final-state)]
+                                                        (push-item input :input)))
+                             result (stack-ref :string 0 final-state)]
                          (when print-outputs
                            (println (format "\n| Correct output: %s\n| Program output: %s" (pr-str correct-output) (pr-str result))))
                          ; Record the behavior

; Define the argmap
(def argmap
 {:error-function (make-camel-case-error-function-from-cases (first camel-case-train-and-test-cases)
                                                                     (second camel-case-train-and-test-cases))
  :atom-generators camel-case-atom-generators
  :max-points 2000
  :max-genome-size-in-initial-program 250

  :report-simplifications 0
  :final-report-simplifications 5000
  :max-error 10000
  })