 
 
 (fact "push-item will not change the interpreter if the item is nil"
-  (u/get-stack (push-item just-basic :integer nil) :integer) => '())
+  (u/get-stack (push-item just-basic :scalar nil) :scalar) => '())
 
 
 ;; reconfigure


(fact "`classic-interpreter` can have its :stacks set"
  (keys (:stacks classy)) => (contains
    [:boolean :char :code :environment :error :exec :float :integer :log :print :return :string :unknown]
    :in-any-order)
  (:integer (:stacks (c/classic-interpreter :stacks {:integer '(8)}))) => '(8)
  (:boolean (:stacks (c/classic-interpreter :stacks {:boolean '(:test)}))) => '(:test))





(fact "u/get-stack will return an empty list for an existing (but empty) stack"
  (u/get-stack just-basic :scalar) => '())


(fact "u/set-stack replaces a stack completely"
