%external %string %fn %spec fromstr(%string (255) s, %integer i, j)
%external %routine loadtest
%integer j
%string (25) test
%string (127) s, a, b, bb
         %if s->a.(fromstr(test, 1, j)).b %and a="" %start
        %finish
%end
%endoffile