equal
deleted
inserted
replaced
30 // NOTE: typed const is a variable despite const qualifier |
30 // NOTE: typed const is a variable despite const qualifier |
31 // in freepascal you may actually use var for the same purpose |
31 // in freepascal you may actually use var for the same purpose |
32 |
32 |
33 type |
33 type |
34 HwColor4f = record |
34 HwColor4f = record |
35 r, g, b, a: byte |
35 r, g, b, a: byte; |
36 end; |
36 end; |
37 |
37 |
38 // Possible states of the game |
38 // Possible states of the game |
39 TGameState = (gsLandGen, gsStart, gsGame, gsChat, gsConfirm, gsExit, gsSuspend); |
39 TGameState = (gsLandGen, gsStart, gsGame, gsChat, gsConfirm, gsExit, gsSuspend); |
40 |
40 |