main module cardbug
    declare
	C : static 8 bit cardinal
    enddeclare

    procedure Test (A: in ref 16 bit cardinal)
    endprocedure

    TEst (C)
endmodule