diff options
| author | ubq323 <ubq323@ubq323.website> | 2024-08-08 14:44:48 +0100 |
|---|---|---|
| committer | ubq323 <ubq323@ubq323.website> | 2024-08-08 14:49:05 +0100 |
| commit | d046c7d20fd283c90495d3af4bb53d1cfb2a0812 (patch) | |
| tree | a764b20d45135101b179a4fbdc122ca0c76bd6b6 /tests/iota_rec.bth | |
| parent | a4e8599e8d0fde881cd4e6e3031e5b52550e878e (diff) | |
misc
Diffstat (limited to 'tests/iota_rec.bth')
| -rw-r--r-- | tests/iota_rec.bth | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/iota_rec.bth b/tests/iota_rec.bth index 8e274a4..5ce196d 100644 --- a/tests/iota_rec.bth +++ b/tests/iota_rec.bth @@ -1,6 +1,6 @@ (defn (iota' arr i max) (if (< i max) - (iota' (append arr i) (+ i 1) max) + (iota' (append! arr i) (+ i 1) max) arr)) (set! _G_iota' iota') (defn (iota n) (_G_iota' [] 0 n)) |