externalroutinespec my exit alias "exit" (integer rc)

begin
  printstring("BEFORE:"); newline
  my exit(1)
  printstring("AFTER:"); newline
end

endoffile