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
**********************************************************************
