Carp/test/produces-output/globals.carp
Erik Svedäng a873099640
chore: Move some examples to test/produces-output (#989)
* chore: Moved examples that work more as tests to folder 'test/produces-output'

* fix: Corrections to the release script

* fix: Correct filename on Windows

* fix: Move more files around

* fix: Remove check-malloc example

* fix: Apparently unicode example does not work

* chore: Move nested_lambdas.carp back to examples

* chore: Remove .DS_Store files

* fix: Bring back unicode test

* test: Make sure benchmark compile (had to remove mandelbrot and n-bodies)

* fix: Replacement implementation of clock_gettime on Windows

* chore: Trigger CI

* fix: Define CLOCK_REALTIME

Co-authored-by: Erik Svedang <erik@Eriks-iMac.local>
2020-11-23 06:30:43 +01:00

31 lines
544 B
Plaintext

(Project.no-echo)
(Debug.sanitize-addresses)
(def s "I'm a global string...")
(deftype A [x Int])
(def a (A.init 666))
;;(Debug.log-memory-balance! true)
(def q [1 2 3 4 5])
(def stuff [(A.init 10) (A.init 20) (A.init 30)])
(defn main []
;;(Debug.assert-balanced
(do
;;(IO.println s)
(IO.println &(A.str &a))
;;(set! a (A.init 123))
;;(IO.println &(A.str &a))
(IO.println &(str &q))
(IO.println &(str &stuff))
)
;;)
)
;; (defn f [x]
;; (do
;; (IO.println &(Int.str x))
;; @gs))