Sign in Join

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

Mailing lists / fpc-devel / 2022-05

TShiftState

3 messages · 2 people ·

Reply by email Subscribe to this list Your subscription

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

Michael Van Canneyt
to Mattias Gaertner
Mattias Gaertner wrote 12 lines
Hi, Delphi has some extra TShiftState enums: ssTouch, ssPen, ssHorizontal https://docwiki.embarcadero.com/Libraries/Sydney/en/System.Classes.TShiftState I propose for fpc to add these three and add an alias constant ssCommand = ssMeta; What do you think?

Compiler got scared by your idea:

fpc a.pp

a.pp(1,9) Fatal: Syntax error, "BEGIN" expected but "identifier CONSTANT" found Fatal: Compilation aborted
Error: /usr/local/bin/ppcx64 returned an error exitcode

After some calming down the compiler I committed & pushed your idea.

Michael.

Reply by email

Mattias Gaertner
to Michael Van Canneyt

On Sat, 7 May 2022 10:21:26 +0200 (CEST)
Michael Van Canneyt via fpc-devel

Show quoted text 22 lines
On Sat, 7 May 2022, Mattias Gaertner via fpc-devel wrote: > Hi, > > Delphi has some extra TShiftState enums: ssTouch, ssPen, > ssHorizontal > > https://docwiki.embarcadero.com/Libraries/Sydney/en/System.Classes.TShiftState > > I propose for fpc to add these three and add an alias > > constant > ssCommand = ssMeta; > > What do you think? Compiler got scared by your idea: > fpc a.pp a.pp(1,9) Fatal: Syntax error, "BEGIN" expected but "identifier CONSTANT" found Fatal: Compilation aborted Error: /usr/local/bin/ppcx64 returned an error exitcode

lol. I should not work at that time.

After some calming down the compiler I committed & pushed your idea.

Thanks!

Mattias

Reply by email