[BREAKING] Feat: quotation is now using ()
This commit is contained in:
@@ -187,30 +187,30 @@ fn nor_ff() {
|
||||
|
||||
#[test]
|
||||
fn ifelse_true() {
|
||||
expect_int("{ 42 } { 99 } 1 ifelse", 42);
|
||||
expect_int("( 42 ) ( 99 ) 1 ifelse", 42);
|
||||
}
|
||||
|
||||
#[test]
|
||||
fn ifelse_false() {
|
||||
expect_int("{ 42 } { 99 } 0 ifelse", 99);
|
||||
expect_int("( 42 ) ( 99 ) 0 ifelse", 99);
|
||||
}
|
||||
|
||||
#[test]
|
||||
fn select_first() {
|
||||
expect_int("{ 10 } { 20 } { 30 } 0 select", 10);
|
||||
expect_int("( 10 ) ( 20 ) ( 30 ) 0 select", 10);
|
||||
}
|
||||
|
||||
#[test]
|
||||
fn select_second() {
|
||||
expect_int("{ 10 } { 20 } { 30 } 1 select", 20);
|
||||
expect_int("( 10 ) ( 20 ) ( 30 ) 1 select", 20);
|
||||
}
|
||||
|
||||
#[test]
|
||||
fn select_third() {
|
||||
expect_int("{ 10 } { 20 } { 30 } 2 select", 30);
|
||||
expect_int("( 10 ) ( 20 ) ( 30 ) 2 select", 30);
|
||||
}
|
||||
|
||||
#[test]
|
||||
fn select_preserves_stack() {
|
||||
expect_int("5 { 10 } { 20 } 0 select +", 15);
|
||||
expect_int("5 ( 10 ) ( 20 ) 0 select +", 15);
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user