a

2026-05-16 10:26:20 -06:00
parent 466e2a38a9
commit f5536ca2e2
7 changed files with 24 additions and 11 deletions
@@ -1,4 +1,8 @@
 ;;; -*- mode:scheme -*-

-(let ((x0 (prim:cons 4 2)) (x2 (prim:write x1)) (x1 (prim:car x0))) x2)
+(let ((x0 (prim:cons 4 2))
+      (x3 (prim:write x2))
+      (x2 (prim:* 3 x1))
+      (x1 (prim:cdr x0)))
+  x3)