[futurebasic] Re: Globals

Message: < previous - next > : Reply : Subscribe : Cleanse
Home   : September 1998 : Group Archive : Group : All Groups

From: RMMerrill@...
Date: Sun, 6 Sep 1998 13:38:35 EDT
>I find if i do something like this:
>GLOBALS "project.glbl"
>compile 0,_thisProject
>end globals
>
>wherein my project.glbl file I put this:
>_thisProject = _caseInsensitive _dimmedVarsOnly _noRedimVars _strResource
>
>I don't have trouble keeping everything together...
>
Okay, but that _noRedimVars plays heck with something like the following: 
(taken directly from the Staz HELP.FLTR)

DEF FN pGbuild(wndRefNum)                                   USING 
GLBLbuild&
DEF FN pGgetObj(objListID,objElem)                          USING 
GLBLgetObj&
DEF FN pGreplaceRes(resHndl&,resTp&,resID,resName$)         USING 
GLBLrepRes&
DEF FN pGkillRes(resHndl&)                                  USING 
GLBLkillRes&
DEF FN pGreplaceXRes(resHndl&,resTp&,resID,resName$,resRef) USING 
GLBLrepXRes&
DEF FN pGpointInObj                                         USING 
GLBLptInObj&
DEF FN pG3ttoTEXT(zHndl&,@TEXTPtr&,@stylPtr&)               USING 
gPG3ttoTEXT&
DEF FN countStr(strID)                                      USING 
gCountStr&
DEF FN openHelpFile                                         USING 
gOpenHelpFile&
DEF FN showTopics USING gShowTopics&

...it complains that all those "resHndl&"s (after the first one) are 
redims and are not allowed.

Also... in every FLTR file there is a line that reads something like this:

GLOBALS "MyProject.GLBL"

and it won't allow these either - claims yet another redim violation. 
What is going on here???

Any guidance would be greatly appreciated.

TIA,

     -=  Bob (-: