/* * @LANG: indep */ int return_to; %%{ machine curs1; unused := 'unused'; one := 'one' @{ print_str "one\n"; fnext *return_to; }; two := 'two' @{ print_str "two\n"; fnext *return_to; }; main := '1' @{ return_to = fcurs; fnext one; } | '2' @{ return_to = fcurs; fnext two; } | '\n'; }%% ##### INPUT ##### "1one2two1one\n" ##### OUTPUT ##### one two one ACCEPT