%begin
%string(2) %fn symbolprefix
    %result = "_"
%end

%routine r
%string(255) name
    name = symbolprefix."HELP"
      %if name="_HELP" %then printstring("Test OK")
%end
r
%endofprogram