diff options
| author | Kurt Zenker <kz@openoffice.org> | 2004-01-19 16:53:58 +0000 |
|---|---|---|
| committer | Kurt Zenker <kz@openoffice.org> | 2004-01-19 16:53:58 +0000 |
| commit | aa1677f142b00e05f5530d6e0892cb769948cd98 (patch) | |
| tree | 29b94543b2c47dbe41bbb205ad2ad6fab312cbc8 /basic | |
| parent | 1d54c91ec2d88848e8910fac19a6303539e2a2ed (diff) | |
INTEGRATION: CWS gh5 (1.2.136); FILE MERGED
2003/12/08 16:29:48 gh 1.2.136.1: #i22675#new commands getError/WarningList
Diffstat (limited to 'basic')
| -rw-r--r-- | basic/source/app/basicrt.cxx | 13 |
1 files changed, 11 insertions, 2 deletions
diff --git a/basic/source/app/basicrt.cxx b/basic/source/app/basicrt.cxx index a85eae2e037f..c5b8ceea8243 100644 --- a/basic/source/app/basicrt.cxx +++ b/basic/source/app/basicrt.cxx @@ -2,9 +2,9 @@ * * $RCSfile: basicrt.cxx,v $ * - * $Revision: 1.2 $ + * $Revision: 1.3 $ * - * last change: $Author: gh $ $Date: 2001-11-06 13:23:44 $ + * last change: $Author: kz $ $Date: 2004-01-19 17:53:58 $ * * The Contents of this file are made available subject to the terms of * either of the following licenses @@ -64,6 +64,10 @@ #include "runtime.hxx" #include "basicrt.hxx" +const String BasicRuntime::GetSourceRevision() +{ + return pRun->GetModule()->GetComment(); +} const String BasicRuntime::GetModuleName( SbxNameType nType ) { @@ -103,6 +107,11 @@ BasicRuntime BasicRuntime::GetNextRuntime() +const String BasicErrorStackEntry::GetSourceRevision() +{ + return pEntry->aMethod->GetModule()->GetComment(); +} + const String BasicErrorStackEntry::GetModuleName( SbxNameType nType ) { return pEntry->aMethod->GetModule()->GetName( nType ); |