Remove solved bug code.

This commit is contained in:
Erik Svedäng 2020-05-04 12:48:56 +02:00
parent a7d2f13dc1
commit 8462412d55

View File

@ -145,31 +145,3 @@
;; (do
;; (set! x 11)
;; (println* x))))
(macro-log "BUGS")
(defn make-array [] [1 2 3])
;; Nasty (and extremely simple!) reference error that apparently prevails
(defn f []
(ref (make-array)))
;; This also does not get detected:
;; (defn g []
;; (let []
;; &[1 2 3]))
;; (defn g []
;; &(make-array))
;; (macro-log "--------")
;; (defn h []
;; (let [xs (ref [1 2 3])]
;; 0))