make pure.spl's or behave like std
This commit is contained in:
parent
9e936277c7
commit
78ec4e066f
1 changed files with 3 additions and 4 deletions
|
@ -13,7 +13,7 @@ func swap { b a | with a b ;
|
||||||
}
|
}
|
||||||
|
|
||||||
func not { !x | with x ;
|
func not { !x | with x ;
|
||||||
1
|
1
|
||||||
x if { pop 0 }
|
x if { pop 0 }
|
||||||
}
|
}
|
||||||
|
|
||||||
|
@ -23,9 +23,8 @@ func and { a&&b | with a b ;
|
||||||
}
|
}
|
||||||
|
|
||||||
func or { a||b | with a b ;
|
func or { a||b | with a b ;
|
||||||
0
|
b
|
||||||
a if { pop 1 }
|
a if { pop a }
|
||||||
b if { pop 1 }
|
|
||||||
}
|
}
|
||||||
|
|
||||||
func alit-end { array | with type ;
|
func alit-end { array | with type ;
|
||||||
|
|
Loading…
Add table
Reference in a new issue