[INTERPRETER]
* BUG: Fix enumeration abortion. git-svn-id: svn://localhost/gambas/trunk@4474 867c0c6c-44f3-4631-809d-bfa615b0a4ec
This commit is contained in:
parent
7a3021909e
commit
859a04ba8c
2 changed files with 57 additions and 57 deletions
|
@ -1036,7 +1036,7 @@ void GB_Attach(void *object, void *parent, const char *name)
|
|||
|
||||
void GB_StopEnum(void)
|
||||
{
|
||||
/* Do not forget than event if we stop the enumeration, the return value
|
||||
/* Do not forget than even if we stop the enumeration, the return value
|
||||
of _next will be converted
|
||||
*/
|
||||
//VALUE_default(&TEMP, *GAMBAS_ReturnType);
|
||||
|
|
|
@ -85,10 +85,10 @@ bool EXEC_enum_next(PCODE code)
|
|||
|
||||
if (!defined && !drop && !cenum->stop)
|
||||
VALUE_conv_variant(&SP[-1]);
|
||||
}
|
||||
|
||||
if (drop || cenum->stop)
|
||||
POP();
|
||||
}
|
||||
|
||||
return cenum->stop;
|
||||
}
|
||||
|
|
Loading…
Reference in a new issue