# This should fail

pragma ada_95;
s : string := $1;