Correct a typo, and a test for the affected verb.

This commit is contained in:
Eric S. Raymond 2017-06-13 17:32:07 -04:00
parent 8718a6c1da
commit dcf4d5f1d3
4 changed files with 11 additions and 4 deletions

View file

@ -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);

View file

@ -1,4 +1,4 @@
# Test verbs on urn
## Test verbs on urn
n
seed 1838473132
in

View file

@ -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?

View file

@ -28,6 +28,7 @@ e
e
drop
say
nothing
wave
calm
walk