begin -> do

Shorter and doesn't imply existence of `end'
2026-09-14 15:48:17 +03:00
parent af6e778185
commit d609a0c591
7 changed files with 9 additions and 9 deletions
--- a/tests/basic.scm
+++ b/tests/basic.scm
@@ -24,7 +24,7 @@
  ;; atom-to-fmt-c
  (test '%fun (atom-to-fmt-c 'fn))
  (test '%prototype (atom-to-fmt-c 'prototype))
-  (test '%block-begin (atom-to-fmt-c 'begin))
+  (test '%block-begin (atom-to-fmt-c 'do))
  (test '%define (atom-to-fmt-c 'define))
  (test '%pointer (atom-to-fmt-c 'pointer))
  (test '%array (atom-to-fmt-c 'array))