From 2bdcaf319b1d74ffbaccf08a58336f804761beab Mon Sep 17 00:00:00 2001 From: LLLL Colonq Date: Thu, 9 Jul 2026 23:51:55 -0400 Subject: Refactor into monorepo --- pit/test/struct.lisp | 11 +++++++++++ 1 file changed, 11 insertions(+) create mode 100644 pit/test/struct.lisp (limited to 'pit/test/struct.lisp') diff --git a/pit/test/struct.lisp b/pit/test/struct.lisp new file mode 100644 index 0000000..9e35654 --- /dev/null +++ b/pit/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.3.1