Correct a typo, and a test for the affected verb.
This commit is contained in:
parent
8718a6c1da
commit
dcf4d5f1d3
4 changed files with 11 additions and 4 deletions
|
@ -1053,12 +1053,12 @@ int action(FILE *input, enum speechpart part, long verb, token_t obj)
|
|||
if (verb == SAY)obj=WD2;
|
||||
if (obj == 0) {
|
||||
/* Analyse an intransitive verb (ie, no object given yet). */
|
||||
switch (verb-1) {
|
||||
switch (verb-1) {
|
||||
case 0: /* CARRY */ return carry(verb, INTRANSITIVE);
|
||||
case 1: /* DROP */ return(8000);
|
||||
case 2: /* SAY */ return(8000);
|
||||
case 3: /* UNLOC */ return lock(verb, INTRANSITIVE);
|
||||
case 4: /* NOTHI */ {RSPEAK(54); return(20012);}
|
||||
case 4: /* NOTHI */ {RSPEAK(54); return(GO_CLEAROBJ);}
|
||||
case 5: /* LOCK */ return lock(verb, INTRANSITIVE);
|
||||
case 6: /* LIGHT */ return light(verb, INTRANSITIVE);
|
||||
case 7: /* EXTIN */ return extinguish(verb, INTRANSITIVE);
|
||||
|
|
|
@ -1,4 +1,4 @@
|
|||
# Test verbs on urn
|
||||
## Test verbs on urn
|
||||
n
|
||||
seed 1838473132
|
||||
in
|
||||
|
|
|
@ -129,6 +129,10 @@ Drop what?
|
|||
|
||||
Okay, "SAY".
|
||||
|
||||
> nothing
|
||||
|
||||
OK
|
||||
|
||||
> wave
|
||||
|
||||
Wave what?
|
||||
|
@ -169,9 +173,11 @@ Wake what?
|
|||
|
||||
You are wandering aimlessly through the forest.
|
||||
|
||||
Would you like to be shown out of the forest?
|
||||
|
||||
> e
|
||||
|
||||
You are wandering aimlessly through the forest.
|
||||
Please answer the question.
|
||||
|
||||
Would you like to be shown out of the forest?
|
||||
|
||||
|
|
|
@ -28,6 +28,7 @@ e
|
|||
e
|
||||
drop
|
||||
say
|
||||
nothing
|
||||
wave
|
||||
calm
|
||||
walk
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue