[futurebasic] Re: [FB] [FB^3] Works w/PPC compile fails with 68k compile

Message: < previous - next > : Reply : Subscribe : Cleanse
Home   : December 2000 : Group Archive : Group : All Groups

From: Alain Pastor <apastor@...>
Date: Sat, 30 Dec 2000 02:52:53 +0100

Brian Stevens wrote:

> Hi everyone,
>
> When I create a 68k version of my application (which I have done
> successfully many times with good results), I get some garbage data.
> It is fairly easy to find the culprit but now I'm stuck. The
> following code snippet reduces the problem to what I believe is its
> essence. The non-register variable whichele% in local fn testit
> contains the value 25 when SeqSearch returns during a PPC RUN (which
> is the result I expect/desire). During a 68k run it comes back
> unchanged. I have checked my preferences and I have the alignment
> option turned on. Same results with a BUILT app (wouldn't expect it
> to be different).
>
> Any and all suggestions would be very much appreciated!
>
> TIA---Brian
>
> dim x%
> end globals
>
> LOCAL FN SeqSearch(@whichele%)
> DIM i%,found%
> i% = 25
> poke word whichele%, i%
> END FN = found%
>
> local fn testit%
> DIM FoundInDayNotes%
> dim @ whichele%
> FoundInDayNotes% = FN SeqSearch(@whichele%)
> end fn
>
> fn testit%
> WINDOW #1, "Tester",(10,50)-(700,700),_docnogrow
>
> print "x% = "; x%
>
> do
>
> until fn button
>

Hi Brian,

I think you are facing the same problem I had a couple of posts ago. The
address of the incoming variable should be typed as a long integer.
LOCAL FN SeqSearch(@whichele&)
POKE WORD whichele&,i%

HTH

Alain