Fix handling of intransitive "say".
This commit is contained in:
parent
6c6498b797
commit
7c9a0bfb36
3 changed files with 4 additions and 4 deletions
2
Makefile
2
Makefile
|
@ -14,7 +14,7 @@
|
|||
VERS=1.0
|
||||
|
||||
CC?=gcc
|
||||
CCFLAGS+=-std=c99 -D _DEFAULT_SOURCE -Wall -Wpedantic
|
||||
CCFLAGS+=-std=c99 -D _DEFAULT_SOURCE -Wall -Wpedantic -g
|
||||
LIBS=
|
||||
UNAME_S := $(shell uname -s)
|
||||
ifeq ($(UNAME_S),Linux)
|
||||
|
|
|
@ -1051,7 +1051,7 @@ int action(FILE *input, enum speechpart part, long verb, token_t obj)
|
|||
case intransitive:
|
||||
if (WD2 > 0 && verb != SAY) return(2800);
|
||||
if (verb == SAY)obj=WD2;
|
||||
if (obj == 0) {
|
||||
if (obj == 0 || obj == INTRANSITIVE) {
|
||||
/* Analyse an intransitive verb (ie, no object given yet). */
|
||||
switch (verb-1) {
|
||||
case 0: /* CARRY */ return carry(verb, INTRANSITIVE);
|
||||
|
|
|
@ -115,11 +115,11 @@ Drop what?
|
|||
|
||||
> say
|
||||
|
||||
Okay, "SAY".
|
||||
Say what?
|
||||
|
||||
> nothing
|
||||
|
||||
OK
|
||||
Okay, "NOTHI".
|
||||
|
||||
> wave
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue