diff options
| author | Oliver Bolte <obo@openoffice.org> | 2004-11-15 12:29:32 +0000 |
|---|---|---|
| committer | Oliver Bolte <obo@openoffice.org> | 2004-11-15 12:29:32 +0000 |
| commit | 3940348684cf81a29adf88d670ce91162140af8e (patch) | |
| tree | f49b25fbaccdd6d145fda54ebe12165cb539e5dd /basic/source/runtime/runtime.cxx | |
| parent | 9f055278a1fbace8179b57f50c70ee9fdd43891b (diff) | |
INTEGRATION: CWS tbe13 (1.16.6); FILE MERGED
2004/10/07 10:40:44 ab 1.16.6.1: #i33955# Implementation setBasicWatchMode(), use WatchMode to suppress errors
Diffstat (limited to 'basic/source/runtime/runtime.cxx')
| -rw-r--r-- | basic/source/runtime/runtime.cxx | 20 |
1 files changed, 16 insertions, 4 deletions
diff --git a/basic/source/runtime/runtime.cxx b/basic/source/runtime/runtime.cxx index f3dfbc7a03af..a2aed22514a7 100644 --- a/basic/source/runtime/runtime.cxx +++ b/basic/source/runtime/runtime.cxx @@ -2,9 +2,9 @@ * * $RCSfile: runtime.cxx,v $ * - * $Revision: 1.17 $ + * $Revision: 1.18 $ * - * last change: $Author: pjunck $ $Date: 2004-11-02 11:58:09 $ + * last change: $Author: obo $ $Date: 2004-11-15 13:29:32 $ * * The Contents of this file are made available subject to the terms of * either of the following licenses @@ -430,6 +430,14 @@ void SbiInstance::Stop() p->Stop(); } +// Allows Basic IDE to set watch mode to suppress errors +static bool bWatchMode = false; + +void setBasicWatchMode( bool bOn ) +{ + bWatchMode = bOn; +} + void SbiInstance::Error( SbError n ) { Error( n, String() ); @@ -437,8 +445,11 @@ void SbiInstance::Error( SbError n ) void SbiInstance::Error( SbError n, const String& rMsg ) { - aErrorMsg = rMsg; - pRun->Error( n ); + if( !bWatchMode ) + { + aErrorMsg = rMsg; + pRun->Error( n ); + } } void SbiInstance::FatalError( SbError n ) @@ -610,6 +621,7 @@ void SbiRuntime::SetParameters( SbxArray* pParams ) } } + // Einen P-Code ausfuehren BOOL SbiRuntime::Step() |