Commit 0b106885 authored by Jesse McGrew's avatar Jesse McGrew

Update 'then' and 'multiples' zillib test cases for new take/wear behavior.

parent 9f437ee306ac
......@@ -79,13 +79,13 @@
<TEST-CASE ("Take all")
<COMMAND [TAKE ALL]>
<EXPECT "hat: Taken (and worn).|
<EXPECT "hat: Taken.|
banana: Taken.|
apple: Taken.|">
<CHECK <IN? ,HAT ,WINNER>>
<CHECK <IN? ,APPLE ,WINNER>>
<CHECK <IN? ,BANANA ,WINNER>>
<CHECK <AND <IN? ,HAT ,WINNER> <FSET? ,HAT ,WORNBIT>>>
<CHECK <AND <IN? ,HAT ,WINNER> <NOT <FSET? ,HAT ,WORNBIT>>>>
<CHECK <NOT <IN? ,CAGE ,WINNER>>>
<CHECK <NOT <IN? ,DESK ,WINNER>>>
<CHECK <NOT <IN? ,BUCKET ,WINNER>>>
......@@ -93,12 +93,12 @@ apple: Taken.|">
<TEST-CASE ("Exclude one object with BUT")
<COMMAND [TAKE ALL BUT BANANA]>
<EXPECT "hat: Taken (and worn).|
<EXPECT "hat: Taken.|
apple: Taken.|">
<CHECK <IN? ,HAT ,WINNER>>
<CHECK <IN? ,APPLE ,WINNER>>
<CHECK <NOT <IN? ,BANANA ,WINNER>>>
<CHECK <AND <IN? ,HAT ,WINNER> <FSET? ,HAT ,WORNBIT>>>
<CHECK <AND <IN? ,HAT ,WINNER> <NOT <FSET? ,HAT ,WORNBIT>>>>
<CHECK <NOT <IN? ,CAGE ,WINNER>>>
<CHECK <NOT <IN? ,DESK ,WINNER>>>
<CHECK <NOT <IN? ,BUCKET ,WINNER>>>
......@@ -106,11 +106,11 @@ apple: Taken.|">
<TEST-CASE ("Exclude two objects with BUT")
<COMMAND [TAKE ALL BUT BANANA AND APPLE]>
<EXPECT "You wear the hat.|">
<EXPECT "You pick up the hat.|">
<CHECK <IN? ,HAT ,WINNER>>
<CHECK <NOT <IN? ,APPLE ,WINNER>>>
<CHECK <NOT <IN? ,BANANA ,WINNER>>>
<CHECK <AND <IN? ,HAT ,WINNER> <FSET? ,HAT ,WORNBIT>>>
<CHECK <AND <IN? ,HAT ,WINNER> <NOT <FSET? ,HAT ,WORNBIT>>>>
<CHECK <NOT <IN? ,CAGE ,WINNER>>>
<CHECK <NOT <IN? ,DESK ,WINNER>>>
<CHECK <NOT <IN? ,BUCKET ,WINNER>>>
......@@ -118,9 +118,9 @@ apple: Taken.|">
<TEST-CASE ("Take individual objects with AND")
<COMMAND [TAKE HAT AND BANANA]>
<EXPECT "hat: Taken (and worn).|
<EXPECT "hat: Taken.|
banana: Taken.|">
<CHECK <AND <IN? ,HAT ,WINNER> <FSET? ,HAT ,WORNBIT>>>
<CHECK <AND <IN? ,HAT ,WINNER> <NOT <FSET? ,HAT ,WORNBIT>>>>
<CHECK <IN? ,BANANA ,WINNER>>
<CHECK <NOT <IN? APPLE ,WINNER>>>>
......
......@@ -81,7 +81,7 @@
|
You pick up the banana.|
|
You wear the hat.|">>
You pick up the hat.|">>
<TEST-CASE ("G THEN G")
<COMMAND [TAKE INVENTORY THEN X ME]>
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment