[Libreoffice-commits] core.git: basic/source

[Arnaud Versini]

 basic/source/comp/parser.cxx |    1 -
 basic/source/inc/parser.hxx  |    1 -
 basic/source/inc/scanner.hxx |    2 +-
 3 files changed, 1 insertion(+), 3 deletions(-)

New commits:
commit 7985e5245a57b284e370faccffcaab47ba137f3f
Author: Arnaud Versini <arnaud.versini at gmail.com>
Date:   Sun Aug 16 20:00:58 2015 +0200

    BASIC : SbiParser::pBasic is useless
    
    Change-Id: I5aa041f78ea5685b996a6baf1d7bc22d5bd957ab
    Reviewed-on: https://gerrit.libreoffice.org/17782
    Tested-by: Jenkins <ci at libreoffice.org>
    Reviewed-by: Noel Grandin <noelgrandin at gmail.com>

diff --git a/basic/source/comp/parser.cxx b/basic/source/comp/parser.cxx
index e62273b..b7af29d 100644
--- a/basic/source/comp/parser.cxx
+++ b/basic/source/comp/parser.cxx
@@ -116,7 +116,6 @@ SbiParser::SbiParser( StarBASIC* pb, SbModule* pm )
           aRtlSyms( aGblStrings, SbRTL, this ),
           aGen( *pm, this, 1024 )
 {
-    pBasic   = pb;
     eCurExpr = SbSYMBOL;
     eEndTok  = NIL;
     pProc    = NULL;
diff --git a/basic/source/inc/parser.hxx b/basic/source/inc/parser.hxx
index 2245651..a1e44ef 100644
--- a/basic/source/inc/parser.hxx
+++ b/basic/source/inc/parser.hxx
@@ -68,7 +68,6 @@ public:
     SbiSymPool    aPublics;         // module global
     SbiSymPool    aRtlSyms;         // Runtime-Library
     SbiCodeGen    aGen;             // Code-Generator
-    StarBASIC*    pBasic;           // StarBASIC instance
     SbiSymPool*   pPool;
     SbiExprType   eCurExpr;
     short         nBase;            // OPTION BASE-value
diff --git a/basic/source/inc/scanner.hxx b/basic/source/inc/scanner.hxx
index e499c25..3207d59 100644
--- a/basic/source/inc/scanner.hxx
+++ b/basic/source/inc/scanner.hxx
@@ -35,6 +35,7 @@ class SbiScanner
     OUString   aLine;
     const sal_Unicode* pLine;
     const sal_Unicode* pSaveLine;
+    StarBASIC* pBasic;                  // instance for error callbacks
 
     void scanAlphanumeric();
     void scanGoto();
@@ -43,7 +44,6 @@ protected:
     OUString aSym;
     OUString aError;
     SbxDataType eScanType;
-    StarBASIC* pBasic;                  // instance for error callbacks
     double nVal;                        // numeric value
     sal_Int32 nCurCol1;
     sal_Int32 nSavedCol1;