Why Gemfury? Push, build, and install  RubyGems npm packages Python packages Maven artifacts PHP packages Go Modules Debian packages RPM packages NuGet packages

Repository URL to install this package:

Details    
fpc-src / usr / share / fpcsrc / 3.2.0 / tests / test / tpointermath2.pp
Size: Mime:
{ %fail }
program tpointermath2;

{$IFDEF FPC}
  {$MODE DELPHI}
{$ENDIF}
type
  PByte = ^Byte;
var
  PB: PByte;
begin
  // Pointer math must fail in delphi mode without pointermath directive
  PB := PB + 1;
end.