Uncomment ifte built-in.
This commit is contained in:
parent
cc8d15ed84
commit
0a76eea3e2
|
|
@ -1007,32 +1007,32 @@ def branch(stack, expression, dictionary):
|
||||||
return stack, concat(then if flag else else_, expression), dictionary
|
return stack, concat(then if flag else else_, expression), dictionary
|
||||||
|
|
||||||
|
|
||||||
##@inscribe
|
@inscribe
|
||||||
##@FunctionWrapper
|
@FunctionWrapper
|
||||||
##def ifte(stack, expression, dictionary):
|
def ifte(stack, expression, dictionary):
|
||||||
## '''
|
'''
|
||||||
## If-Then-Else Combinator
|
If-Then-Else Combinator
|
||||||
## ::
|
::
|
||||||
##
|
|
||||||
## ... [if] [then] [else] ifte
|
... [if] [then] [else] ifte
|
||||||
## ---------------------------------------------------
|
---------------------------------------------------
|
||||||
## ... [[else] [then]] [...] [if] infra select i
|
... [[else] [then]] [...] [if] infra select i
|
||||||
##
|
|
||||||
##
|
|
||||||
##
|
|
||||||
##
|
|
||||||
## ... [if] [then] [else] ifte
|
... [if] [then] [else] ifte
|
||||||
## -------------------------------------------------------
|
-------------------------------------------------------
|
||||||
## ... [else] [then] [...] [if] infra first choice i
|
... [else] [then] [...] [if] infra first choice i
|
||||||
##
|
|
||||||
##
|
|
||||||
## Has the effect of grabbing a copy of the stack on which to run the
|
Has the effect of grabbing a copy of the stack on which to run the
|
||||||
## if-part using infra.
|
if-part using infra.
|
||||||
## '''
|
'''
|
||||||
## (else_, (then, (if_, stack))) = stack
|
(else_, (then, (if_, stack))) = stack
|
||||||
## expression = (S_infra, (S_first, (S_choice, (S_i, expression))))
|
expression = (S_infra, (S_first, (S_choice, (S_i, expression))))
|
||||||
## stack = (if_, (stack, (then, (else_, stack))))
|
stack = (if_, (stack, (then, (else_, stack))))
|
||||||
## return stack, expression, dictionary
|
return stack, expression, dictionary
|
||||||
|
|
||||||
|
|
||||||
@inscribe
|
@inscribe
|
||||||
|
|
|
||||||
Loading…
Reference in New Issue