shithub: snippets

Info  •  Files  •  Log  •  Branches

add clear

--- a/README.md

+++ b/README.md

@@ -11,4 +11,5 @@

 * `qt.[ch]` [QP tries](https://dotat.at/prog/qp/README.html)

 * `xml.[ch]` XML parser, works as a streaming parser as well

+* `clear` removes all program output from the terminal, leaving only commands used

 * `watch` watch-like tool, imagine

--- /dev/null

+++ b/clear

@@ -1,0 +1,10 @@

+#!/bin/rc

+# clears all the output from programs,

+# leaving only the command prompts

+

+grep `{echo -n '^'^$prompt(1)} </dev/text | \

+	grep -v '^'^$prompt(1)^clear | \

+	uniq >/tmp/clearing.$pid

+

+cp /tmp/clearing.$pid /dev/text

+rm -f /tmp/clearing.$pid