RosettaCodeData/Task/Address-of-a-variable/Modula-2/address-of-a-variable-2.mod2

MODULE  SetAddress;

CONST   adress  = 134664460;

VAR     var [adress] : INTEGER;

BEGIN
    (*do nothing*)
END SetAddress.