From ced75fcef9ea06f6bc92704c04a2cc2e5881ca8d Mon Sep 17 00:00:00 2001
From: Andreas Bregas <ab@openoffice.org>
Date: Mon, 12 Aug 2002 10:57:34 +0000
Subject: #100027# New ProcDecl flag in class SbiProcDef

---
 basic/source/inc/symtbl.hxx | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

(limited to 'basic/source/inc/symtbl.hxx')

diff --git a/basic/source/inc/symtbl.hxx b/basic/source/inc/symtbl.hxx
index cc75b483d0c4..a237ee8a36ce 100644
--- a/basic/source/inc/symtbl.hxx
+++ b/basic/source/inc/symtbl.hxx
@@ -2,9 +2,9 @@
  *
  *  $RCSfile: symtbl.hxx,v $
  *
- *  $Revision: 1.2 $
+ *  $Revision: 1.3 $
  *
- *  last change: $Author: ab $ $Date: 2001-09-04 09:56:50 $
+ *  last change: $Author: ab $ $Date: 2002-08-12 11:56:13 $
  *
  *  The Contents of this file are made available subject to the terms of
  *  either of the following licenses
@@ -221,8 +221,9 @@ class SbiProcDef : public SbiSymDef {   // Prozedur-Definition (aus Basic):
     USHORT nLine1, nLine2;          // Zeilenbereich
     BOOL   bCdecl  : 1;             // TRUE: CDECL angegeben
     BOOL   bPublic : 1;             // TRUE: proc ist PUBLIC
+    BOOL   mbProcDecl : 1;          // TRUE: instanciated by SbiParser::ProcDecl
 public:
-    SbiProcDef( SbiParser*, const String& );        // Name
+    SbiProcDef( SbiParser*, const String&, BOOL bProcDecl=false );
     virtual ~SbiProcDef();
     virtual SbiProcDef* GetProcDef();
     virtual void SetType( SbxDataType );
@@ -235,6 +236,7 @@ public:
     BOOL IsPublic() const           { return bPublic;  }
     void SetCdecl( BOOL b = TRUE)   { bCdecl = b;      }
     BOOL IsCdecl() const            { return bCdecl;   }
+    BOOL IsUsedForProcDecl() const  { return mbProcDecl; }
     void SetLine1( USHORT n )       { nLine1 = n;      }
     USHORT GetLine1() const         { return nLine1;   }
     void SetLine2( USHORT n )       { nLine2 = n;      }
-- 
cgit