[fpc-pascal]Problem with CASE statement

[Tomas Hajny]

From:        Lubomir.Cabla at cssz.cz
To:          fpc-pascal at lists.freepascal.org
Subject:     RE: [fpc-pascal]Problem with CASE statement
Date sent:   Wed, 24 Mar 2004 08:01:04 +0100

> The problem is in declarations of constant:
> 
> const xxx = $4400;
> yyy = $11;
> 
> SizeOf(xxx) = 2 in FPC 1.0.10
> 4 in FPC 1.9.x
> SizeOf(yyy) = 1 in FPC 1.0.10
> 4 in FPC 1.9.x
> 
> Constants xxx and yyy are ordinal types, but i don't
> know which count of
> bytes they got.
> 
> Maybe now are all constants defined like longword
> (dword), but in PDF doc
> for 1.9.2
> i can not find this.

 Hi (word (xxx)) should work everywhere if you need to specify
the size explicitely. You're right that it should be documented,
of course.

Tomas


> -----Original Message-----
> From: Matt Emson [mailto:memsom at interalpha.co.uk]
> Sent: Tuesday, March 23, 2004 3:19 PM
> To: fpc-pascal at lists.freepascal.org
> Subject: Re: [fpc-pascal]Problem with CASE statement
> 
> 
> 
> > In go32v2 i got a problem with case statement.
> > With compiler 1.0.10 is this without errors:
> >
> > const kbDown = $5000;
> >       kbUp   = $4800;
> > var ch : char;
> > begin
> >   ch:=ReadKey;
> >   case ord(ch) of
> >     Hi(kbDown): writeln('kbDown');
> >     Hi(kbUp)  : writeln('kbUp');
> >   end;
> > end.


-- 
Surfujete pres VOLNY? Tak proc jeste nejste ve VOLNY klubu?
Nyni exkluzivne pro cleny klubu soutez o skvele ceny.
http://klub.volny.cz