"Source: Text/System/State.text";
"Line: 1208";
"Date: Wed Mar 24 09:58:40 2021";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/System/State.text, line: 1208
// Example: H1E13 ()
print "Example: H1E13";
ei := GetEchoInput();
SetEchoInput(true);
// no-test
procedure always_fails(x)
    error Error(x);
end procedure;
try
    always_fails(1);
    always_fails(2);  // we never get here
catch e
    print "In catch handler";
    error "Error calling procedure with parameter: ", e`Object;
end try;
SetEchoInput(ei);
