archives/open-adventure
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

More switch reformatting.

Browse source
This commit is contained in:
Eric S. Raymond 2017-05-23 23:17:57 -04:00
parent 1e2e24f4d5
commit 7e5448e974
1 changed files with 36 additions and 16 deletions
Download patch file Download diff file Expand all files Collapse all files

52
actions1.c
View file

@ -70,22 +70,42 @@ L4000: VERB=K;
/* Analyse a transitive verb. */ /* Analyse a transitive verb. */
L4090: switch (VERB-1) { case 0: goto L9010; case 1: goto L9020; case 2: goto L4090: switch (VERB-1) {
L9030; case 3: goto L9040; case 4: return(2009); case 5: goto L9040; case 0: goto L9010; /* CARRY */
case 6: goto L9070; case 7: goto L9080; case 8: goto L9090; case case 1: goto L9020; /* DROP */
9: return(2011); case 10: return(2011); case 11: goto L9120; case 12: case 2: goto L9030; /* SAY */
goto L9130; case 13: goto L9140; case 14: goto L9150; case 15: case 3: goto L9040; /* UNLOC */
goto L9160; case 16: goto L9170; case 17: return(2011); case 18: case 4: return(2009); /* NOTHI */
goto L9190; case 19: goto L9190; case 20: goto L9210; case 21: case 5: goto L9040; /* LOCK */
goto L9220; case 22: goto L9230; case 23: return(2011); case 24: case 6: goto L9070; /* LIGHT */
return(2011); case 25: return(2011); case 26: goto L9270; case 27: case 7: goto L9080; /* EXTI */
goto L9280; case 28: goto L9290; case 29: return(2011); case 30: case 8: goto L9090; /* WAVE */
return(2011); case 31: goto L9320; case 32: return(2011); case 33: case 9: return(2011); /* CALM */
goto L8340; } case 10: return(2011); /* WALK */
/* TAKE DROP SAY OPEN NOTH LOCK ON OFF WAVE CALM case 11: goto L9120; /* ATTAC */
* WALK KILL POUR EAT DRNK RUB TOSS QUIT FIND INVN case 12: goto L9130; /* POUR */
* FEED FILL BLST SCOR FOO BRF READ BREK WAKE SUSP case 13: goto L9140; /* EAT */
* RESU FLY LSTN ZZZZ */ case 14: goto L9150; /* DRINK */
case 15: goto L9160; /* RUB */
case 16: goto L9170; /* TOSS */
case 17: return(2011); /* QUIT */
case 18: goto L9190; /* FIND */
case 19: goto L9190; /* INVEN */
case 20: goto L9210; /* FEED */
case 21: goto L9220; /* FILL */
case 22: goto L9230; /* BLAST */
case 23: return(2011); /* SCOR */
case 24: return(2011); /* FOO */
case 25: return(2011); /* BRIEF */
case 26: goto L9270; /* READ */
case 27: goto L9280; /* BREAK */
case 28: goto L9290; /* WAKE */
case 29: return(2011); /* SUSP */
case 30: return(2011); /* RESU */
case 31: goto L9320; /* FLY */
case 32: return(2011); /* LISTEN */
case 33: goto L8340; /* ZZZZ */
}
BUG(24); BUG(24);
/* Analyse an object word. See if the thing is here, whether we've got a verb /* Analyse an object word. See if the thing is here, whether we've got a verb