From 49fe6eb11fda5fccb016feb914b0bce1ae2ea6a0 Mon Sep 17 00:00:00 2001
From: Marshall Lochbaum <mwlochbaum@gmail.com>
Date: Sat, 14 Aug 2021 10:31:36 -0400
Subject: Fix header variable slot adjustment if there are bodies without
 headers

---
 test/cases/header.bqn | 1 +
 1 file changed, 1 insertion(+)

(limited to 'test')

diff --git a/test/cases/header.bqn b/test/cases/header.bqn
index cdca846d..09e3efea 100644
--- a/test/cases/header.bqn
+++ b/test/cases/header.bqn
@@ -68,6 +68,7 @@
 ! % {F𝕩:f←𝕩}
 2 % {𝕨Fn𝕩:1(⊣Fn⍟(¬𝕨⊣0)+)𝕩}0
 ! % {w𝕊𝕩:𝕩}3
+3 % {{𝕨S𝕩:1+𝕩}}{𝔽}2
 4 % 1{a B c:c B⍟a 2×a+c}0
 5 % {𝕊n,:n+↩2,𝕩+↩1,n+𝕩}1
 8 % 4{𝔽_m:2×𝕗}
-- 
cgit v1.2.3