--- gforth/errors.fs	2003/02/17 22:42:08	1.13
+++ gforth/errors.fs	2003/02/28 10:59:11	1.14
@@ -103,4 +103,6 @@ variable next-exception -2050 next-excep
     next-exception @
     -1 next-exception +! ;
 
+-2049 constant broken-pipe-error ( -- n ) \ gforth
+\G the error number for a broken pipe