pt::peg_language(3tcl)
โจ NAME โจ
okay bestie, welcome to pt::peg_language(3tcl) from Parser Tools ๐ this whole page is the pt::peg_language โ PEG Language Tutorial, and it's giving main-character energy for parsing expression grammars. no cap.
๐ฆ SYNOPSIS ๐ฆ
package require Tcl 8.5 9
so first things first: you need Tcl 8.5 or 9, and then you're in. ๐ซถ
๐ฌ DESCRIPTION ๐ฌ
are you lost ? ๐ญ do you have trouble understanding this document ? in that case please read the overview provided by the Introduction to Parser Tools. this document is the entrypoint to the whole system the current package is a part of. fr fr.
welcome to the tutorial / introduction for the PEG Specification Language โจ if you are already familiar with the language we are about to discuss, and only wish to refresh your memory you can, of course, skip ahead to the aforementioned section and just read the full formal specification. lowkey iconic.
๐ค WHAT IS IT? ๐ค
peg, a language for the specification of parsing expression grammars, is meant to be human readable, and writable as well, yet strict enough to allow its processing by machine. like any computer language. it was defined to make writing the specification of a grammar easy, something the other formats found in the Parser Tools do not lend themselves too. periodt.
๐ง THE ELEMENTS OF THE LANGUAGE ๐ง
๐ธ BASIC STRUCTURE ๐ธ
the general outline of a textual PEG is
PEG <<name>> (<<start-expression>>)
<<rules>>
END;
note: we are using text in double angle-brackets as place-holders for things not yet explained. ๐
๐ NAMES ๐
names are mostly used to identify the nonterminal symbols of the grammar, i.e. that which occurs on the left-hand side of a <rule>. the exception to that is the name given after the keyword PEG (see previous section), which is the name of the whole grammar itself. iykyk.
the structure of a name is simple:
- it begins with a letter, underscore, or colon, followed by
- zero or more letters, digits, underscores, or colons.
or, in formal textual notation:
([_:] / <alpha>) ([_:] / <alnum>)*
examples of names:
Hello
::world
_:submarine55_
examples of text which are not names:
12
.bogus
0wrong
@location
๐ RULES ๐
the main body of the text of a grammar specification is taken up by the rules. each rule defines the sentence structure of one nonterminal symbol. their basic structure is
<<name>> <- <<expression>> ;
the <name> specifies the nonterminal symbol to be defined, the <expression> after the arrow (<-) then declares its structure.
note that each rule ends in a single semicolon, even the last. i.e. the semicolon is a rule terminator, not a separator. no cap.
we can have as many rules as we like, as long as we define each nonterminal symbol at most once, and have at least one rule for each nonterminal symbol which occured in an expression, i.e. in either the start expression of the grammar, or the right-hande side of a rule. ๐
๐ฅ EXPRESSIONS ๐ฅ
the parsing expressions are the meat of any specification. they declare the structure of the whole document (<<start-expression>>), and of all nonterminal symbols.
all expressions are made up out of atomic expressions and operators combining them. we have operators for choosing between alternatives, repetition of parts, and for look-ahead constraints. there is no explicit operator for the sequencing (also known as concatenation) of parts however. this is specified by simply placing the parts adjacent to each other. it's giving adjacency.
here are the operators, from highest to lowest priority (i.e. strength of binding):
# Binary operators.
<<expression-1>> <<expression-2>> # sequence. parse 1, then 2.
<<expression-1>> / <<expression-2>> # alternative. try to parse 1, and parse 2 if 1 failed to parse.
# Prefix operators. Lookahead constraints. Same priority.
& <<expression>> # Parse expression, ok on successful parse.
! <<expression>> # Ditto, except ok on failure to parse.
# Suffix operators. Repetition. Same priority.
<<expression>> ? # Parse expression none, or once (repeat 0 or 1).
<<expression>> * # Parse expression zero or more times.
<<expression>> + # Parse expression one or more times.
# Expression nesting
( <<expression>> ) # Put an expression in parens to change its priority.
with this we can now deconstruct the formal expression for names given in section Names:
([_:] / <alpha>) ([_:] / <alnum>)*
it is a sequence of two parts,
[_:] / <alpha>
and
([_:] / <alnum>)*
the parentheses around the parts kept their inner alternatives bound together against the normally higher priority of the sequence. each of the two parts is an alternative, with the second part additionally repeated zero or more times, leaving us with the three atomic expressions
[_:]
<alpha>
<alnum>
and atomic expressions are our next topic. they fall into three classes:
- names, i.e. nonterminal symbols,
- string literals, and
- character classes.
names we know about already, or see section Names for a refresher. ๐
string literals are simple. they are delimited by (i.e. start and end with) either a single or double-apostroph, and in between the delimiters we can have any character but the delimiter itself. they can be empty as well. examples of strings are
''
""
'hello'
"umbra"
"'"
'"'
the last two examples show how to place any of the delimiters into a string. obsessed.
for the last, but not least of our atomic expressions, character classes, we have a number of predefined classes, shown below, and the ability to construct or own. the predefined classes are:
<alnum> # Any unicode alphabet or digit character (string is alnum).
<alpha> # Any unicode alphabet character (string is alpha).
<ascii> # Any unicode character below codepoint 0x80 (string is ascii).
<control> # Any unicode control character (string is control).
<ddigit> # The digit characters [0-9].
<digit> # Any unicode digit character (string is digit).
<graph> # Any unicode printing character, except space (string is graph).
<lower> # Any unicode lower-case alphabet character (string is lower).
<print> # Any unicode printing character, incl. space (string is print).
<punct> # Any unicode punctuation character (string is punct).
<space> # Any unicode space character (string is space).
<upper> # Any unicode upper-case alphabet character (string is upper).
<wordchar> # Any unicode word character (string is wordchar).
<xdigit> # The hexadecimal digit characters [0-9a-fA-F].
. # Any character, except end of input.
and the syntax of custom-defined character classes is
[ <<range>>* ]
where each range is either a single character, or of the form
<<character>> - <character>>
examples for character classes we have seen already in the course of this introduction are
[_:]
[0-9]
[0-9a-fA-F]
we are nearly done with expressions. the only piece left is to tell how the characters in character classes and string literals are specified.
basically characters in the input stand for themselves, and in addition to that we several types of escape syntax to to repesent control characters, or characters outside of the encoding the text is in. ๐ญ
all the escaped forms are started with a backslash character ('\', unicode codepoint 0x5C). this is then followed by a series of octal digits, or 'u' and hexedecimal digits, or a regular character from a fixed set for various control characters. some examples:
\n \r \t \' \" \[ \] \\ #
\000 up to \277 # octal escape, all ascii character, leading 0's can be removed.
\u2CA7 # hexadecimal escape, all unicode characters.
# # Here 2ca7 <=> Koptic Small Letter Tau
๐งผ WHITESPACE AND COMMENTS ๐งผ
one issue not touched upon so far is whitespace and comments.
whitespace is any unicode space character, i.e. anything in the character class <space>, and comments. the latter are sequences of characters starting with a '#' (hash, unicode codepoint 0x23) and ending at the next end-of-line.
whitespace can be freely used between all syntactical elements of a grammar specification. it cannot be used inside of syntactical elements, like names, string literals, predefined character classes, etc. periodt.
๐ NONTERMINAL ATTRIBUTES ๐
lastly, a more advanced topic. in the section Rules we gave the structure of a rule as
<<name>> <- <<expression>> ;
this is not quite true. it is possible to associate a semantic mode with the nonterminal in the rule, by writing it before the name, separated from it by a colon, i.e. writing
<<mode>> : <<name>> <- <<expression>> ;
is also allowed. this mode is optional. the known modes and their meanings are:
valueโ the semantic value of the nonterminal symbol is an abstract syntax tree consisting of a single node node for the nonterminal itself, which has the ASTs of the symbol's right hand side as its children.leafโ the semantic value of the nonterminal symbol is an abstract syntax tree consisting of a single node node for the nonterminal, without any children. any ASTs generated by the symbol's right hand side are discarded.voidโ the nonterminal has no semantic value. any ASTs generated by the symbol's right hand side are discarded (as well).
of these three modes only leaf and void can be specified directly. value is implicitly specified by the absence of a mode before the nonterminal.
now, with all the above under our belt it should be possible to not only read, but understand the formal specification of the text representation shown in the next section, written in itself.
โจ PEG SPECIFICATION LANGUAGE โจ
okay bestie, so peg is a language for specifying parsing expression grammars, and the whole point of it is that it's meant to be human readable and writable too โ but still strict enough that a machine can chew through it. like any computer language, fr fr. ๐
the way it was designed? to make writing the spec of a grammar <em>easy</em>, which is lowkey something the other formats hanging out in the Parser Tools just do not lend themselves to. ๐
it's formally specified by the grammar shown below โ and yes, it's written in itself, she's self-referential, she's the moment. ๐ for a tutorial / introduction to the language, please go and read the PEG Language Tutorial.
PEG pe_grammar_for_peg (Grammar)
# --------------------------------------------------------------------
# Syntactical constructs
Grammar <- WHITESPACE Header Definition* Final EOF ;
Header <- PEG Identifier StartExpr ;
Definition <- Attribute? Identifier IS Expression SEMICOLON ;
Attribute <- (VOID / LEAF) COLON ;
Expression <- Sequence (SLASH Sequence)* ;
Sequence <- Prefix+ ;
Prefix <- (AND / NOT)? Suffix ;
Suffix <- Primary (QUESTION / STAR / PLUS)? ;
Primary <- ALNUM / ALPHA / ASCII / CONTROL / DDIGIT / DIGIT
/ GRAPH / LOWER / PRINTABLE / PUNCT / SPACE / UPPER
/ WORDCHAR / XDIGIT
/ Identifier
/ OPEN Expression CLOSE
/ Literal
/ Class
/ DOT
;
Literal <- APOSTROPH (!APOSTROPH Char)* APOSTROPH WHITESPACE
/ DAPOSTROPH (!DAPOSTROPH Char)* DAPOSTROPH WHITESPACE ;
Class <- OPENB (!CLOSEB Range)* CLOSEB WHITESPACE ;
Range <- Char TO Char / Char ;
StartExpr <- OPEN Expression CLOSE ;
void: Final <- "END" WHITESPACE SEMICOLON WHITESPACE ;
# --------------------------------------------------------------------
# Lexing constructs
Identifier <- Ident WHITESPACE ;
leaf: Ident <- ([_:] / <alpha>) ([_:] / <alnum>)* ;
Char <- CharSpecial / CharOctalFull / CharOctalPart
/ CharUnicode / CharUnescaped
;
leaf: CharSpecial <- "\\" [nrt'"\[\]\\] ;
leaf: CharOctalFull <- "\\" [0-3][0-7][0-7] ;
leaf: CharOctalPart <- "\\" [0-7][0-7]? ;
leaf: CharUnicode <- "\\" 'u' HexDigit (HexDigit (HexDigit HexDigit?)?)? ;
leaf: CharUnescaped <- !"\\" . ;
void: HexDigit <- [0-9a-fA-F] ;
void: TO <- '-' ;
void: OPENB <- "[" ;
void: CLOSEB <- "]" ;
void: APOSTROPH <- "'" ;
void: DAPOSTROPH <- '"' ;
void: PEG <- "PEG" !([_:] / <alnum>) WHITESPACE ;
void: IS <- "<-" WHITESPACE ;
leaf: VOID <- "void" WHITESPACE ; # Implies that definition has no semantic value.
leaf: LEAF <- "leaf" WHITESPACE ; # Implies that definition has no terminals.
void: SEMICOLON <- ";" WHITESPACE ;
void: COLON <- ":" WHITESPACE ;
void: SLASH <- "/" WHITESPACE ;
leaf: AND <- "&" WHITESPACE ;
leaf: NOT <- "!" WHITESPACE ;
leaf: QUESTION <- "?" WHITESPACE ;
leaf: STAR <- "*" WHITESPACE ;
leaf: PLUS <- "+" WHITESPACE ;
void: OPEN <- "(" WHITESPACE ;
void: CLOSE <- ")" WHITESPACE ;
leaf: DOT <- "." WHITESPACE ;
leaf: ALNUM <- "<alnum>" WHITESPACE ;
leaf: ALPHA <- "<alpha>" WHITESPACE ;
leaf: ASCII <- "<ascii>" WHITESPACE ;
leaf: CONTROL <- "<control>" WHITESPACE ;
leaf: DDIGIT <- "<ddigit>" WHITESPACE ;
leaf: DIGIT <- "<digit>" WHITESPACE ;
leaf: GRAPH <- "<graph>" WHITESPACE ;
leaf: LOWER <- "<lower>" WHITESPACE ;
leaf: PRINTABLE <- "<print>" WHITESPACE ;
leaf: PUNCT <- "<punct>" WHITESPACE ;
leaf: SPACE <- "<space>" WHITESPACE ;
leaf: UPPER <- "<upper>" WHITESPACE ;
leaf: WORDCHAR <- "<wordchar>" WHITESPACE ;
leaf: XDIGIT <- "<xdigit>" WHITESPACE ;
void: WHITESPACE <- (" " / "\t" / EOL / COMMENT)* ;
void: COMMENT <- '#' (!EOL .)* EOL ;
void: EOL <- "\n\r" / "\n" / "\r" ;
void: EOF <- !. ;
# --------------------------------------------------------------------
END;
๐งฎ EXAMPLE ๐งฎ
our example specifies the grammar for a basic 4-operation calculator. iconic, honestly. ๐
PEG calculator (Expression)
Digit <- '0'/'1'/'2'/'3'/'4'/'5'/'6'/'7'/'8'/'9' ;
Sign <- '-' / '+' ;
Number <- Sign? Digit+ ;
Expression <- Term (AddOp Term)* ;
MulOp <- '*' / '/' ;
Term <- Factor (MulOp Factor)* ;
AddOp <- '+'/'-' ;
Factor <- '(' Expression ')' / Number ;
END;
now bestie, using higher-level features of the notation โ i.e. the character classes, both predefined and custom โ this same example can be rewritten as:
PEG calculator (Expression)
Sign <- [-+] ;
Number <- Sign? <ddigit>+ ;
Expression <- Term (AddOp Term)* ;
MulOp <- [*/];
Term <- Factor (MulOp Factor)* ;
AddOp <- [-+];
Factor <- '(' Expression ')' / Number ;
END;
see how much cleaner?? she <em>ate</em>. โจ
๐ BUGS, IDEAS, FEEDBACK ๐ฌ
ngl, this document and the package it describes will undoubtedly contain bugs and other problems. it's not a vibe, it's just reality. ๐ญ please report such things in the category pt of the Tcllib Trackers at http://core.tcl.tk/tcllib/reportlist. and please also report any ideas for enhancements you may have for either the package and/or the documentation โ we want them, we love them, send them. ๐
when proposing code changes, please provide unified diffs, i.e. the output of diff -u.
also note, and this one matters: attachments are strongly preferred over inlined patches. attachments can be made by going to the Edit form of the ticket immediately after its creation, and then using the left-most button in the secondary navigation bar. do it that way, bestie, trust. ๐ซถ
๐ KEYWORDS ๐
EBNFLL(k)PEGTDPLcontext-free languagesexpressiongrammarmatchingparserparsing expressionparsing expression grammarpush down automatonrecursive descentstatetop-down parsing languagestransducer
๐๏ธ CATEGORY ๐๏ธ
Parsing and Grammars
ยฉ๏ธ COPYRIGHT ยฉ๏ธ
Copyright (c) 2009 Andreas Kupries <andreas_kupries@users.sourceforge.net>
and that's a wrap on part two, bestie ๐ this whole thing is from tcllib, version 1.1, and the page is pt::peg_language(3tcl). go forth and write grammars, you absolute main character. ๐
โจ๐
๐ฆ where this page comes from
- debian trixie: tcllib 2.0+dfsg-4 ยท Tcl
- ubuntu questing: tcllib 2.0+dfsg-4
- ubuntu resolute: tcllib 2.0+dfsg-5 ยท Tcl
- ubuntu stonking: tcllib 2.0+dfsg-6 ยท Tcl
- Copyright (c) 2009 Andreas Kupries <andreas_kupries@users\&.sourceforge\&.net>
- ๐ girlified by deepseek-ai/DeepSeek-V4.1-Flash on : a language model's rewrite of the original, under its terms