summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--basic/source/comp/exprtree.cxx3
1 files changed, 2 insertions, 1 deletions
diff --git a/basic/source/comp/exprtree.cxx b/basic/source/comp/exprtree.cxx
index 8b222573502b..53dcfc57e779 100644
--- a/basic/source/comp/exprtree.cxx
+++ b/basic/source/comp/exprtree.cxx
@@ -215,7 +215,8 @@ SbiExprNode* SbiExpression::Term( const KeywordSymbolInfo* pKeywordSymbolInfo )
return new SbiExprNode( aSym );
}
// no keywords allowed from here on!
- if( SbiTokenizer::IsKwd( eTok ) )
+ if( SbiTokenizer::IsKwd( eTok )
+ && (!pParser->IsCompatible() || eTok != INPUT) )
{
pParser->Error( ERRCODE_BASIC_SYNTAX );
bError = true;