; GENERATED by tools/export_headtable.ps1 from src/VLA_HeadTable.bas - do not hand-edit or lint; the VBA is the source (PORT.5).
; (head <symbol> (<alias> ...) "<arity>" "<interpreter routine>" "<VBA routine>" <yes|refused|undeclared> <export-only>), in the order BuildRows adds them.
(head sub () "variable (name, params, [doc], body)" "" "EmitProc" undeclared false)
(head function () "variable (name, params, [type], [doc], body)" "" "EmitProc" undeclared false)
(head type () "variable (name, members)" "" "EmitTypeDef" undeclared false)
(head enum () "variable (name, members)" "" "EmitEnumDef" undeclared false)
(head public () "1 (wrapped form)" "" "EmitVisibility" undeclared false)
(head private () "1 (wrapped form)" "" "EmitVisibility" undeclared false)
(head include () "1 (path)" "" "refused - whole-line splicer only, never reaches the emitter" undeclared false)
(head dim () "1-2 (name, [type])" "" "EmitDimCore (via EmitTop or EmitStmt)" refused false)
(head const () "2 (name, value)" "" "EmitConstCore (via EmitTop or EmitStmt)" undeclared false)
(head raw () "1 (literal VBA text)" "" "StrLitContent (inline)" undeclared true)
(head begin () "variable (body)" "" "EmitBody (inline)" refused false)
(head deflambda () "variable (name, params, [doc], formula-body)" "" "EmitDeflambda" refused true)
(head set! (fijar!) "2 (place, value)" "" "inline in EmitStmt" refused false)
(head obj-set! () "2 (place, value)" "" "inline in EmitStmt" refused false)
(head if (si) "variable (test, clauses)" "" "EmitIf" yes false)
(head for () "variable (header, body)" "" "EmitFor" refused false)
(head for-each () "variable (header, body)" "" "EmitForEach" refused false)
(head while () "variable (test, body)" "" "inline in EmitStmt" refused false)
(head do-until () "variable (test, body)" "" "inline in EmitStmt" undeclared false)
(head select () "variable (expr, cases)" "" "EmitSelect" undeclared false)
(head with () "variable (expr, body)" "" "inline in EmitStmt" undeclared false)
(head return () "0-1 (value)" "" "EmitReturn" undeclared false)
(head exit-sub () "0" "" "inline in EmitStmt" undeclared false)
(head exit-function () "0" "" "inline in EmitStmt" undeclared false)
(head exit-for () "0" "" "inline in EmitStmt" undeclared false)
(head exit-do () "0" "" "inline in EmitStmt" undeclared false)
(head redim () "variable (name, dims)" "" "EmitRedim" undeclared false)
(head on-error () "1-2 (resume-next | goto label)" "" "inline in EmitStmt" undeclared false)
(head goto () "1 (label)" "" "inline in EmitStmt" undeclared false)
(head label () "1 (name)" "" "inline in EmitStmt" undeclared false)
(head quote () "1 (datum)" "" "EmitQuote / QuoteDatum" yes false)
(head debug-print (depurar) "variable (values)" "" "inline in EmitStmt" refused false)
(head call () "variable (name, args)" "" "EmitCallStmt" undeclared false)
(head . () "variable (obj, member, [args])" "" "EmitDotText" undeclared false)
(head at-line () "variable (line-number, statements)" "" "inline in EmitStmt" undeclared false)
(head then () "variable (body) - clause of if only" "" "consumed by EmitIf" undeclared false)
(head else () "variable (body) - clause of if only" "" "consumed by EmitIf" undeclared false)
(head elseif () "variable (test, body) - clause of if only" "" "consumed by EmitIf" undeclared false)
(head case () "variable (values, body) - clause of select only" "" "consumed by EmitSelect" undeclared false)
(head case-else () "variable (body) - clause of select only" "" "consumed by EmitSelect" undeclared false)
(head doc () "1 (text)" "" "EmitDoc" undeclared false)
(head resume () "0-1 (next | label)" "" "inline in EmitStmt" undeclared false)
(head new () "1 (type name)" "" "inline in EmitExpr" undeclared false)
(head lambda () "2 (params, formula-body) - formula dialect only" "" "n/a - EmitFormula only; falls through EmitExpr's Case Else outside a formula" yes true)
(head + () "2+ (chain)" "" "EmitChain" yes false)
(head - () "1 (negate) or 2+ (chain)" "" "EmitChain / inline unary" yes false)
(head * () "2+ (chain)" "" "EmitChain" yes false)
(head & () "2+ (chain)" "" "EmitChain" yes false)
(head / () "2+ (chain)" "" "EmitChain" yes false)
(head \ () "2+ (chain)" "" "EmitChain" undeclared false)
(head = () "2+ (chain)" "" "EmitChain" yes false)
(head <> () "2+ (chain)" "" "EmitChain" yes false)
(head < () "2+ (chain)" "" "EmitChain" yes false)
(head > () "2+ (chain)" "" "EmitChain" yes false)
(head <= () "2+ (chain)" "" "EmitChain" yes false)
(head >= () "2+ (chain)" "" "EmitChain" yes false)
(head and () "2+ (chain)" "" "EmitChain" yes false)
(head or () "2+ (chain)" "" "EmitChain" yes false)
(head xor () "2+ (chain)" "" "EmitChain" undeclared false)
(head mod () "2 (a, b)" "" "EmitChain (VBA); fixed 2-arg MOD() in formulas" yes false)
(head is () "2 (chain)" "" "EmitChain" undeclared false)
(head like () "2 (chain)" "" "EmitChain" undeclared false)
(head imp () "2+ (chain)" "" "EmitChain" undeclared false)
(head eqv () "2+ (chain)" "" "EmitChain" undeclared false)
(head not () "1" "" "inline in EmitExpr" yes false)