usr/share/fpcsrc/3.2.0/tests/webtbs/uw10477.pp · beefree / fpc-src v3.2.0 - deb package | Gemfury

beefree / fpc-src deb

Repository URL to install this package:

Details

fpc-src / usr / share / fpcsrc / 3.2.0 / tests / webtbs / uw10477.pp

unit uw10477;

interface

var
  MyVar: longint;

implementation

{$if sizeof(MyVar)<>4}
  {$Message FAIL 'Error'}
{$ifend}

end.