Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Mailing lists / fpc-pascal / 2005-08

Array of Char

3 messages · 2 people · –

Reply by email Subscribe to this list Your subscription

Read-only archive. Use j and k to move between messages.

Carsten Bager

We are moving from another Pascal compiler where this is allowed.
----------------------
Type

  txt_typ=packed array[0..1] of char;
Const
  txt1:txt_typ=('12');
--------------------------

Is there a way around this without having to write --------

  txt1:txt_typ=('1','2');

--------

Another thing, with the old compiler we can write

Type
  A_typ=array[0..3] of integer;
Var
 A1,A2:A_typ;
Begin
  If A1=A2 then
End;
I have never could understand when this is allowed
A1:=A2;
Why this is not allowed
If A1=A2 then

in most Pascal compilers.

Regards Carsten

Carsten Bager Bøvlingbjerg El-automatik Brørupvænget 10 7650 Bøvlingbjerg Tlf. +4597885222 Fax +4597885434 www.beas.dk The following section of this message contains a file attachment prepared for transmission using the Internet MIME message format. If you are using Pegasus Mail, or any other MIME-compliant system, you should be able to save it or view it from within your mailer. If you cannot, please ask your system administrator for assistance. ---- File information ----------- File: Beas_Logo_1cm.bmp Date: 4 May 2004, 12:14 Size: 15720 bytes. Type: Unknown
Carsten Bager

We are moving from another Pascal compiler where this is allowed.
----------------------
Type

  txt_typ=packed array[0..1] of char;
Const
  txt1:txt_typ=('12');
--------------------------

Is there a way around this without having to write --------

  txt1:txt_typ=('1','2');

--------

Another thing, with the old compiler we can write

Type
  A_typ=array[0..3] of integer;
Var
 A1,A2:A_typ;
Begin
  If A1=A2 then
End;
I have never could understand when this is allowed
A1:=A2;
Why this is not allowed
If A1=A2 then

in most Pascal compilers.

Regards Carsten

Carsten Bager Bøvlingbjerg El-automatik Brørupvænget 10 7650 Bøvlingbjerg Tlf. +4597885222 Fax +4597885434 http://www.beas.dk
John Coppens
to Carsten Bager
We are moving from another Pascal compiler where this is allowed. ----------------------
Type
   txt_typ = packed array[0..1] of char;
Const
   txt1: txt_typ = '12';

without the parenthesis should work.

John