diff options
| author | Richard Carlsson <[email protected]> | 2018-04-17 13:28:24 +0200 |
|---|---|---|
| committer | Richard Carlsson <[email protected]> | 2018-05-04 10:22:36 +0200 |
| commit | e7a3bf9c385ac6df2209c6f7c92543a3dd7f6497 (patch) | |
| tree | 91975afb8062e901666d59dc1ee0dbb3e60b0fe6 /lib/tools/test/eprof_SUITE_data/eed.erl | |
| parent | f7fd8127c18f25bc9678bda067d1503a0bc0e3b2 (diff) | |
| download | otp-e7a3bf9c385ac6df2209c6f7c92543a3dd7f6497.tar.gz otp-e7a3bf9c385ac6df2209c6f7c92543a3dd7f6497.tar.bz2 otp-e7a3bf9c385ac6df2209c6f7c92543a3dd7f6497.zip | |
Move lib:nonl/1 into yecc.erl
Diffstat (limited to 'lib/tools/test/eprof_SUITE_data/eed.erl')
| -rw-r--r-- | lib/tools/test/eprof_SUITE_data/eed.erl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lib/tools/test/eprof_SUITE_data/eed.erl b/lib/tools/test/eprof_SUITE_data/eed.erl index 5f2a21aa60..73531d8b99 100644 --- a/lib/tools/test/eprof_SUITE_data/eed.erl +++ b/lib/tools/test/eprof_SUITE_data/eed.erl @@ -54,7 +54,7 @@ edit(Name) -> loop(St0) -> {ok, St1, Cmd} = get_line(St0), - case catch command(lib:nonl(Cmd), St1) of + case catch command(nonl(Cmd), St1) of {'EXIT', Reason} -> %% XXX Should clear outstanding global command here. loop(print_error({'EXIT', Reason}, St1)); @@ -66,6 +66,10 @@ loop(St0) -> loop(St2) end. +nonl([10]) -> []; +nonl([]) -> []; +nonl([H|T]) -> [H|nonl(T)]. + command(Cmd, St) -> case parse_command(Cmd, St) of quit -> |