aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorMarshall Lochbaum <mwlochbaum@gmail.com>2020-08-18 23:02:09 -0400
committerMarshall Lochbaum <mwlochbaum@gmail.com>2020-08-18 23:02:09 -0400
commite6285d28750af5e663666bf17e3969efbdfa5681 (patch)
tree02322c72e78bc6a27b9838465b34daaea104c3ec /src
parent8529cfa70e0975c67425bb90c872984ecc31c0d2 (diff)
Check for negative nesting depth
Diffstat (limited to 'src')
-rw-r--r--src/c.bqn1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/c.bqn b/src/c.bqn
index 06fcd28f..59dbc742 100644
--- a/src/c.bqn
+++ b/src/c.bqn
@@ -91,6 +91,7 @@ ErrMismatchedBrackets←{
Parse ← {nv‿r←𝕨
g←⍋+`p←𝕩(Mׯ1⋆2|-⟜⊑)bB⋄br←p×𝕩M 2≍˜2+⊑bB
p(=⟜1⊸/ErrMismatchedBrackets⍟≢1-˜=⟜¯1⊸/)○(g⊸⊏)𝕩
+ "Swapped open and closed brackets" ! (0≤⊑p)∧0=⊑g
sl←1⊸⌽⊸∨𝕩 M bL⋄sr←¯1⊸⌽⌾(g⊸⊏)sl⋄sa←sl∨sr
g⊏˜↩⍋g⊏sl⋄r×↩¬sa⋄o←p>0
r+↩(sa<𝕩=1+⊑bB)(⊣∧¬⊸∨=○(⌈`(1+↕∘≠)⊸×)⊢)(¯1⊸⌽⌾(g⊸⊏)3=r)∨1≤r