My original Palm code contains the statement

Var

...

tab:array[0..63] of char =
('A','B','C','D','E','F','G','H','I','J','K','L','M','N','O','P','Q','R','S','T','U','V','W','X','Y','Z',
'a','b','c','d','e','f','g','h','i','j','k','l','m','n','o','p','q','r','s','t','u','v','w','x','y','z',
'0','1','2','3','4','5','6','7','8','9','+','/');

Pepe does not seem to allow initialized variables - at least not for array variables. It asks for ';' after the word 'char'.

So I changed this to

Var 

tab:array[0..63] of char;

and in the main part added:

Begin

tab :=
('A','B','C','D','E','F','G','H','I','J','K','L','M','N','O','P','Q','R','S','T','U','V','W','X','Y','Z',
'a','b','c','d','e','f','g','h','i','j','k','l','m','n','o','p','q','r','s','t','u','v','w','x','y','z',
'0','1','2','3','4','5','6','7','8','9','+','/');

Pepe doesn't like this either - it asks for a ')' after character 'A'

Is there a way of initializing an array without using a loop.

Incidentally the array is actually a constant look-up table.What would be the best way of implementing it?

Oliver Pretzel

Rectifié par Philippe le 10/11/2012 @ 12:29

Many thanks, Philippe, for your advice and also for developing Pépé (le Moko).

 I thought of using the string[64] type too, but wasn't sure that referencing individual characters by tab[x+1] would work. It will I suppose slightly slow down the program as it needs to reference the table quite frequently.

So I'll try this first. It seems simpler than using the asm + pointer workaround.

Oliver Pretzel

Philip,

I compiled using the string[64]. It compiled without a problem, but I had to change the code from Motorola big-endian to ARM little-endian to get the right results. Luckily my implementation uses a variant record type (and luckily Pepe understands variant records) - only the definition of this type needs to be changed. So its working now!

Thank you again,

Oliver

Oliver Pretzel