Carp/examples/external_struct.carp

(local-include "../examples/banana.h")
(Project.no-echo)

(register-type Apple)
(register-type Banana [price Double, size Int])

(defn main []
  (let [b (Banana.init 2.3 1000)]
    (IO.println &(Banana.str &b))))
Moved external struct example to its own file. 2017-11-17 19:34:07 +03:00			`(local-include "../examples/banana.h")`
Added dynamic function 'Project.no-echo' to disable echoing in examples. 2018-06-05 11:05:33 +03:00			`(Project.no-echo)`
Moved external struct example to its own file. 2017-11-17 19:34:07 +03:00
			`(register-type Apple)`
			`(register-type Banana [price Double, size Int])`

			`(defn main []`
			`(let [b (Banana.init 2.3 1000)]`
			`(IO.println &(Banana.str &b))))`