File psl-1983/3-1/tests/stubs2.red from the latest check-in

% STUBS2.RED
% just a dummy for now

procedure Flag(x, y);
 List('dummy, 'flag, x,y);

END;