From 37ff7af18cd2e896506e6d228058204525b4a6eb Mon Sep 17 00:00:00 2001
From: Taylan Kammer <taylan.kammer@gmail.com>
Date: Sun, 31 May 2026 20:58:42 +0200
Subject: More proper shebang line parsing.

---
 docs/c1/grammar/peg.txt | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

(limited to 'docs/c1/grammar/peg.txt')

diff --git a/docs/c1/grammar/peg.txt b/docs/c1/grammar/peg.txt
index 465123f..cee9c84 100644
--- a/docs/c1/grammar/peg.txt
+++ b/docs/c1/grammar/peg.txt
@@ -50,11 +50,12 @@ HexByte      <- HEXDIG HEXDIG
 UnicodeSV    <- HEXDIG+
 
 RuneExpr     <- Rune ( '\' BareString / CladDatum )?
-HashBang     <- '!' [\t ]* BareString
+HashBang     <- '!' [\t ]* HBLine '\n'?
 LabelExpr    <- '%' Label ( '%' / '=' Datum )
 HashDatum    <- '\' BareString / CladDatum
 
 Rune         <- ALPHA ( ALPHA / DIGIT )*
+HBLine       <- HBChars+ [\t ]* ( HBChars+ )?
 Label        <- HEXDIG+
 
 ParenList    <- '(' ListBody ')'
@@ -63,6 +64,9 @@ BraceList    <- '{' ListBody '}'
 
 ListBody     <- Unit* ( Blank* '&' Unit )? Blank*
 
+HBChars       : ~( SP | HTAB | LF )
+
+
 DIGIT        <- [0-9]
 ALPHA        <- [a-zA-Z]
 HEXDIG       <- [0-9a-fA-F]
-- 
cgit v1.2.3