diff options
Diffstat (limited to 'basic/qa/cppunit/basictest.cxx')
-rw-r--r-- | basic/qa/cppunit/basictest.cxx | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/basic/qa/cppunit/basictest.cxx b/basic/qa/cppunit/basictest.cxx index 9a414b7f5e1a..3a22c84e9007 100644 --- a/basic/qa/cppunit/basictest.cxx +++ b/basic/qa/cppunit/basictest.cxx @@ -108,12 +108,15 @@ bool MacroSnippet::Compile() bool MacroSnippet::HasError() const { return mbError; } +const ErrCode& MacroSnippet::getError() const { return maErrCode; } + IMPL_LINK( MacroSnippet, BasicErrorHdl, StarBASIC *, /*pBasic*/, bool) { fprintf(stderr,"(%d:%d)\n", StarBASIC::GetLine(), StarBASIC::GetCol1()); fprintf(stderr,"Basic error: %s\n", OUStringToOString( StarBASIC::GetErrorText(), RTL_TEXTENCODING_UTF8 ).getStr() ); mbError = true; + maErrCode = StarBASIC::GetErrorCode(); return false; } |