shithub: riscv

Download patch

ref: 029f07292b6b2e4c6409ae7fd365808b0ed5f68f
parent: dbe0a995f03f26ea2b6859d21df3bd67856d672d
author: mischief <[email protected]>
date: Mon Aug 24 22:09:22 EDT 2015

import E script from bell labs

--- /dev/null
+++ b/rc/bin/E
@@ -1,0 +1,16 @@
+#!/bin/rc
+# E file - B file, wait until it changes, exit
+rfork e
+if (! ~ $#* 1) {
+	echo usage: $0 file >[1=2]
+	exit usage
+}
+if (! test -e $1) {
+	echo $0: $1: no such file >[1=2]
+	exit no-file
+}
+otm = `{mtime $1 | awk '{print $1}'}
+B $1
+while (~ $otm `{mtime $1 | awk '{print $1}'})
+	sleep 1
+exit ''