C-CON: Redefine "break" within events to mean "skip the remainder of this event block", not "skip the remainder of execution of this event, through all chained blocks". The latter behavior is still available through the "return" keyword.

git-svn-id: https://svn.eduke32.com/eduke32@5097 1a8010ca-5511-0410-912e-c29ae57300e0
This commit is contained in:
hendricks266 2015-03-27 12:28:45 +00:00
parent a096b579da
commit c784fdb21c
2 changed files with 46 additions and 5 deletions

View file

@ -134,6 +134,7 @@ weapondata_t g_playerWeapon[MAXPLAYERS][MAX_WEAPONS];
#if !defined LUNATIC #if !defined LUNATIC
static intptr_t *g_parsingEventPtr=NULL; static intptr_t *g_parsingEventPtr=NULL;
static intptr_t *g_parsingEventBreakPtr=NULL;
static char *textptr; static char *textptr;
#endif #endif
@ -2678,6 +2679,16 @@ static void C_FinishBitOr(int32_t value)
g_scriptPtr++; g_scriptPtr++;
} }
static void C_FillEventBreakStackWithJump(intptr_t *breakPtr, intptr_t destination)
{
while (breakPtr)
{
intptr_t const tempPtr = *breakPtr;
*breakPtr = destination;
breakPtr = (intptr_t*)tempPtr;
}
}
static int32_t C_ParseCommand(int32_t loop) static int32_t C_ParseCommand(int32_t loop)
{ {
int32_t i, j=0, k=0, tw, otw; int32_t i, j=0, k=0, tw, otw;
@ -3470,10 +3481,12 @@ static int32_t C_ParseCommand(int32_t loop)
} }
else // if (tw == CON_APPENDEVENT) else // if (tw == CON_APPENDEVENT)
{ {
intptr_t const destination = g_parsingEventPtr - script;
intptr_t *previous_event_end = apScriptGameEventEnd[j]; intptr_t *previous_event_end = apScriptGameEventEnd[j];
*(previous_event_end++) = CON_JUMP; *(previous_event_end++) = CON_JUMP;
*(previous_event_end++) = MAXGAMEVARS; *(previous_event_end++) = MAXGAMEVARS;
*(previous_event_end++) = g_parsingEventPtr-script; C_FillEventBreakStackWithJump((intptr_t*)*previous_event_end, destination);
*(previous_event_end++) = destination;
} }
g_checkingIfElse = 0; g_checkingIfElse = 0;
@ -6080,22 +6093,28 @@ repeatcase:
// if event has already been declared then put a jump in instead // if event has already been declared then put a jump in instead
if (EDUKE32_PREDICT_FALSE((intptr_t)previous_event)) if (EDUKE32_PREDICT_FALSE((intptr_t)previous_event))
{ {
intptr_t const destination = previous_event - script;
g_scriptPtr--; g_scriptPtr--;
*(g_scriptPtr++) = CON_JUMP; *(g_scriptPtr++) = CON_JUMP;
*(g_scriptPtr++) = MAXGAMEVARS; *(g_scriptPtr++) = MAXGAMEVARS;
*(g_scriptPtr++) = previous_event-script; *(g_scriptPtr++) = destination;
*(g_scriptPtr++) = CON_ENDEVENT; *(g_scriptPtr++) = CON_ENDEVENT;
previous_event = NULL; previous_event = NULL;
C_FillEventBreakStackWithJump(g_parsingEventBreakPtr, destination);
} }
else else
{ {
// pad space for the next potential appendevent // pad space for the next potential appendevent
apScriptGameEventEnd[g_currentEvent] = g_scriptPtr-1; apScriptGameEventEnd[g_currentEvent] = g_scriptPtr-1;
g_parsingEventPtr = (intptr_t*)(g_scriptPtr - script - 1);
*(g_scriptPtr++) = CON_ENDEVENT; *(g_scriptPtr++) = CON_ENDEVENT;
*(g_scriptPtr++) = CON_ENDEVENT; *(g_scriptPtr++) = (intptr_t)g_parsingEventBreakPtr;
*(g_scriptPtr++) = CON_ENDEVENT; *(g_scriptPtr++) = CON_ENDEVENT;
} }
g_parsingEventPtr = g_parsingActorPtr = NULL;
g_parsingEventBreakPtr = g_parsingEventPtr = g_parsingActorPtr = NULL;
g_currentEvent = -1; g_currentEvent = -1;
Bsprintf(g_szCurrentBlockName,"(none)"); Bsprintf(g_szCurrentBlockName,"(none)");
continue; continue;
@ -6130,6 +6149,14 @@ repeatcase:
} }
return 1; return 1;
} }
else if (g_parsingEventPtr)
{
g_scriptPtr--;
*(g_scriptPtr++) = CON_JUMP;
*(g_scriptPtr++) = MAXGAMEVARS;
*g_scriptPtr = (intptr_t)g_parsingEventBreakPtr;
g_parsingEventBreakPtr = g_scriptPtr++;
}
continue; continue;
case CON_SCRIPTSIZE: case CON_SCRIPTSIZE:
@ -6571,6 +6598,21 @@ void C_Compile(const char *filenam)
{ {
int32_t j=0, k=0, l=0; int32_t j=0, k=0, l=0;
for (i = 0; i < MAXEVENTS; ++i)
{
intptr_t *eventEnd = apScriptGameEventEnd[i];
if (eventEnd)
{
// C_FillEventBreakStackWithEndEvent
intptr_t *breakPtr = (intptr_t*)*(eventEnd + 2);
while (breakPtr)
{
*(breakPtr-2) = CON_ENDEVENT;
breakPtr = (intptr_t*)*breakPtr;
}
}
}
hash_free(&h_labels); hash_free(&h_labels);
hash_free(&h_keywords); hash_free(&h_keywords);
freehashnames(); freehashnames();

View file

@ -2456,7 +2456,6 @@ nullquote:
case CON_ENDSWITCH: case CON_ENDSWITCH:
case CON_ENDEVENT: case CON_ENDEVENT:
insptr++;
return; return;
case CON_DISPLAYRAND: case CON_DISPLAYRAND: