4.3BSD/usr/contrib/X/xted/run_interactive.clu

run_interactive = proc (e: env, c: char)
		    signals (errmsg(string), stop(env, string))
    signal errmsg("Cannot run interactive programs")
    end run_interactive