one final note:
The solution I used was tom John Poteat
He got the code to compile by simply removing extra parentheses -- who would
have thought REMOVING parens would make some thing work :)
so - in the one line of code that would not compile:
Original
SORT ARRAY(($Handle->{1})->;($Handle->{2})->;($Handle->{3}->);>)
Working
SORT ARRAY($Handle->{1}->;$Handle->{2}->;$Handle->{3}->;>)
Thanks again -
Chip
> Replying to my own -
>
> THANKS everyone
>
> this is/was driving me MAD.
>
> I'll look into the offered suggestions and see which works best.
> The posted code is only a portion of what is going on, and is a little
> simplified (using fixed value for array element reference (i.e. {1},
> {2} etc)
>
> What is odd-er about the this mess is the 'real' code has a case
> statement extending out to 12, using the exact same syntax for the SORT
> ARRAY command in each case, only SOME will not compile.
>
> Cases 3, 6, 9 and 12 - give the error message regarding the unexpected
> operator, while
> Cases 1, 2, 4, 5, 7, 8, 10, & 11 do NOT throw this error?!?!?!?
>
>
>
> On Fri, 17 Aug 2018 11:18:09 -0400, Chip Scheide via 4D_Tech wrote:
>> Can some one (everyone?) try to compile the following code
>>
>> if it compiles, please let me know, or let me know what you did to get
>> it to compile.
>> I have tried everything I can think of to get this to compile - and it
>> will not.
>>
>> the following is a portion of a much larger case statement which fails
>> to compile throwing the error:
>> Did not expect the operator <
>>
>> I can not figure out why...
>>
>> Thanks in advace
>> Chip
>>
>> Code:
>> C_POINTER($1;$Handle)
>> C_TEXT($formula)
>> C_LONGINT($i;$2;$Sort_Column;$3;$Direction;$Sze)
>>
>> $Handle:=$1
>> $Direction:=$2
>> $Sort_Column:=$3
>>
>> errutl_Start
>>
>> $Sze:=Size of array($Handle->)
>>
>> If ($Size<=12)
>>
>> If ($Direction=Ascending)
>> Case of
>> : ($Size=1)
>> SORT ARRAY(($Handle->{1})->;>)
>>
>> : ($Size=2)
>> SORT ARRAY(($Handle->{1})->;($Handle->{2})->;>)
>>
>> : ($Size=3)
>> SORT ARRAY(($Handle->{1})->;($Handle->{2})->;($Handle->{3})->;>)
>> End case
>> End if
>> End if
>> ---------------
>> Gas is for washing parts
>> Alcohol is for drinkin'
>> Nitromethane is for racing
>> **********************************************************************
>> 4D Internet Users Group (4D iNUG)
>> Archive: http://lists.4d.com/archives.html
>> Options: https://lists.4d.com/mailman/options/4d_tech
>> Unsub: mailto:4d_tech-unsubscr...@lists.4d.com
>> **********************************************************************
> ---------------
> Gas is for washing parts
> Alcohol is for drinkin'
> Nitromethane is for racing
> **********************************************************************
> 4D Internet Users Group (4D iNUG)
> Archive: http://lists.4d.com/archives.html
> Options: https://lists.4d.com/mailman/options/4d_tech
> Unsub: mailto:4d_tech-unsubscr...@lists.4d.com
> **********************************************************************
------------
Hell is other people
Jean-Paul Sartre
**********************************************************************
4D Internet Users Group (4D iNUG)
Archive: http://lists.4d.com/archives.html
Options: https://lists.4d.com/mailman/options/4d_tech
Unsub: mailto:4d_tech-unsubscr...@lists.4d.com
**********************************************************************
