Fix comment in peg eval-rule
parent
ec896eeba8
commit
4135f81514
|
@ -109,7 +109,7 @@ C: <head> peg-head
|
||||||
: eval-rule ( rule -- ast )
|
: eval-rule ( rule -- ast )
|
||||||
#! Evaluate a rule, return an ast resulting from it.
|
#! Evaluate a rule, return an ast resulting from it.
|
||||||
#! Return fail if the rule failed. The rule has
|
#! Return fail if the rule failed. The rule has
|
||||||
#! stack effect ( input -- parse-result )
|
#! stack effect ( -- parse-result )
|
||||||
pos get swap execute process-rule-result ; inline
|
pos get swap execute process-rule-result ; inline
|
||||||
|
|
||||||
: memo ( pos rule -- memo-entry )
|
: memo ( pos rule -- memo-entry )
|
||||||
|
|
Loading…
Reference in New Issue