; 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" refused false)
(head function () "variable (name, params, [type], [doc], body)" "" "EmitProc" refused false)
(head type () "variable (name, members)" "" "EmitTypeDef" yes false)
(head enum () "variable (name, members)" "" "EmitEnumDef" refused false)
(head public () "1 (wrapped form)" "" "EmitVisibility" refused false)
(head private () "1 (wrapped form)" "" "EmitVisibility" refused false)
(head include () "1 (path)" "" "refused - whole-line splicer only, never reaches the emitter" refused false)
(head dim () "1-2 (name, [type])" "" "EmitDimCore (via EmitTop or EmitStmt)" refused false)
(head const () "2 (name, value)" "" "EmitConstCore (via EmitTop or EmitStmt)" refused false)
(head raw () "1 (literal VBA text)" "" "StrLitContent (inline)" refused 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 for-each-row () "variable (header, body)" "" "EmitForEachRow" refused false)
(head while () "variable (test, body)" "" "inline in EmitStmt" refused false)
(head do-until () "variable (test, body)" "" "inline in EmitStmt" refused false)
(head select () "variable (expr, cases)" "" "EmitSelect" refused false)
(head with () "variable (expr, body)" "" "inline in EmitStmt" refused false)
(head return () "0-1 (value)" "" "EmitReturn" refused false)
(head exit-sub () "0" "" "inline in EmitStmt" refused false)
(head exit-function () "0" "" "inline in EmitStmt" refused false)
(head exit-for () "0" "" "inline in EmitStmt" refused false)
(head exit-do () "0" "" "inline in EmitStmt" refused false)
(head redim () "variable (name, dims)" "" "EmitRedim" refused false)
(head on-error () "1-2 (resume-next | goto label)" "" "inline in EmitStmt" refused false)
(head goto () "1 (label)" "" "inline in EmitStmt" refused false)
(head label () "1 (name)" "" "inline in EmitStmt" refused 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" refused false)
(head . () "variable (obj, member, [args])" "" "EmitDotText" refused false)
(head at-line () "variable (line-number, statements)" "" "inline in EmitStmt" refused false)
(head then () "variable (body) - clause of if only" "" "consumed by EmitIf" refused false)
(head else () "variable (body) - clause of if only" "" "consumed by EmitIf" refused false)
(head elseif () "variable (test, body) - clause of if only" "" "consumed by EmitIf" refused false)
(head case () "variable (values, body) - clause of select only" "" "consumed by EmitSelect" refused false)
(head case-else () "variable (body) - clause of select only" "" "consumed by EmitSelect" refused false)
(head doc () "1 (text)" "" "EmitDoc" refused false)
(head resume () "0-1 (next | label)" "" "inline in EmitStmt" refused false)
(head new () "1 (type name)" "" "inline in EmitExpr" refused 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" refused 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" yes false)
(head mod () "2 (a, b)" "" "EmitChain (VBA); fixed 2-arg MOD() in formulas" yes false)
(head is () "2 (chain)" "" "EmitChain" refused false)
(head like () "2 (chain)" "" "EmitChain" refused false)
(head imp () "2+ (chain)" "" "EmitChain" refused false)
(head eqv () "2+ (chain)" "" "EmitChain" refused false)
(head not () "1" "" "inline in EmitExpr" yes false)