pascal
/
fpc
spiegel van https://gitlab.com/freepascal.org/fpc/source.git


			
				
					
						
						
							123456789
							{ %VERSION=1.1 }
{$mode objfpc}
var
   a : longint absolute 0;

begin
   if @a<>nil then
     halt(1);
end.