diff options
| author | Rüdiger Timm <rt@openoffice.org> | 2004-11-15 15:35:59 +0000 |
|---|---|---|
| committer | Rüdiger Timm <rt@openoffice.org> | 2004-11-15 15:35:59 +0000 |
| commit | 59f669f634684463f015839d6f3a7fa26b5d02f1 (patch) | |
| tree | e48198d7ebf8066ad9949c61f2723d0cf75c370f /basic | |
| parent | 9356caad231a1504710189edc0cda333a1725786 (diff) | |
INTEGRATION: CWS texteng03 (1.17.58); FILE MERGED
2004/11/04 10:48:30 ab 1.17.58.1: #118235# Moved struct SbiGosubStack here and included For Level there
Diffstat (limited to 'basic')
| -rw-r--r-- | basic/source/inc/runtime.hxx | 11 |
1 files changed, 9 insertions, 2 deletions
diff --git a/basic/source/inc/runtime.hxx b/basic/source/inc/runtime.hxx index 8fd23f2f8618..5eb424c5cf01 100644 --- a/basic/source/inc/runtime.hxx +++ b/basic/source/inc/runtime.hxx @@ -2,9 +2,9 @@ * * $RCSfile: runtime.hxx,v $ * - * $Revision: 1.18 $ + * $Revision: 1.19 $ * - * last change: $Author: pjunck $ $Date: 2004-11-02 11:56:18 $ + * last change: $Author: rt $ $Date: 2004-11-15 16:35:59 $ * * The Contents of this file are made available subject to the terms of * either of the following licenses @@ -141,6 +141,12 @@ struct SbiForStack { // for/next stack: SbxVariableRef refInc; // increment expression }; +struct SbiGosubStack { // GOSUB-Stack: + SbiGosubStack* pNext; // Chain + const BYTE* pCode; // Return-Pointer + USHORT nStartForLvl; // #118235: For Level in moment of gosub +}; + #define MAXRECURSION 500 // max. 500 Rekursionen #define Sb_ATTR_NORMAL 0x0000 @@ -339,6 +345,7 @@ class SbiRuntime SbiForStack* pForStk; // FOR/NEXT-Stack USHORT nExprLvl; // Tiefe des Expr-Stacks USHORT nGosubLvl; // Zum Vermeiden von Tot-Rekursionen + USHORT nForLvl; // #118235: Maintain for level const BYTE* pCode; // aktueller Code-Pointer const BYTE* pStmnt; // Beginn des lezten Statements const BYTE* pError; // Adresse des aktuellen Error-Handlers |