[fpc-pascal] Label

[Rainer Stratmann]

Is it possible to get the adress of a label in a procedure?


label mark1;

procedure s;
begin
 mark1:
end;

var p : pointer;

begin
 p := @mark1;  // does not work;
end;
_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal