From 4b294e47144da00ae4b9568fed39569d187ce07e Mon Sep 17 00:00:00 2001 From: LLLL Colonq Date: Fri, 27 Mar 2026 17:23:26 -0400 Subject: Fix doubles --- test/struct.lisp | 11 +++++++++++ 1 file changed, 11 insertions(+) create mode 100644 test/struct.lisp (limited to 'test/struct.lisp') diff --git a/test/struct.lisp b/test/struct.lisp new file mode 100644 index 0000000..9e35654 --- /dev/null +++ b/test/struct.lisp @@ -0,0 +1,11 @@ +(defstruct! foo + x + y + z) + +(setq! x (foo/new :y 10 :x 5 :z 111)) +(print! x) +(print! (foo/get-y x)) +(foo/set-y! x 42) +(print! (foo/get-y x)) +(print! (foo/get-z x)) -- cgit v1.2.3