;;
;; Variable declarations and updates
;;

(supress-errors true)
(print "(error? (def a 1)) -> ") (error? (def a 1))
(print "a -> ") a
(print "(error? (def a 300)) -> ") (error? (def a 300))
(print "a -> ") a
(print "(error? (def a \"strings\")) -> ") (error? (def a "strings"))
(print "a -> ") a
(print "(error? (def a 1)) -> ") (error? (def a '(quoted symbols 123 or "strings")))
(print "a -> ") a
(print "(error? (set! a 42)) -> ") (error? (set! a 42))
(print "a -> ") a
(print "(error? (set! b 99)) -> ") (error? (set! b 99))