TILE Forth posting snafu

[Keith Ericson]

The first shar file of the recently posted TILE Forth system has a screw up
in it (at least as it reached the Pacific Northwest of the US) which prevents
one from properly extracting the files.

It appears that a section of the shar file got dropped somewhere: when
attempting to extract error.h the shar runs into the io.h file.  The result
is that the here-file scheme ("cat << END_OF_error.h") fails (because
because the next "END_OF..." line to be found is "END_OF_io.h"), and the
shell poops out with a failure to write the file.  In the mean time, all the
remaining files in the first posting get discarded.

A temporary fix is to comment out a section of lines to circumvent the
error.h/io.h problem.  You'll then be able to get the _rest_ of the files,
and we'll have to wait for a re-post of error.h and io.h (hint, hint).

Here's where to do the changes.  It's 40 or 41 lines that have to be
excluded.  Comment out (as shown) the lines marked below with a + as the
first character in the line:

	if test ! -d src ; then
	    echo shar: Creating directory \"src\"
	    mkdir src
	fi
+	# if test -f src/error.h -a "${1}" != "-c" ; then 
+	#   echo shar: Will not over-write existing file \"src/error.h\"
+	# else
+	# echo shar: Extracting \"src/error.h\" \(396 characters\)
+	# sed "s/^X//" >src/error.h <<'END_OF_src/error.h'
+	# X/*
+	# X  C BASED FORTH-83 MULTI-TASKING KERNEL ERROR MANAGEMENT DEFINITIONS
+	# X
+	# X  Copyright (c) 1989-1990 by Mikael R.K. Patel
+	# X
+	# X*/
+	# X
+	# X
+	# X/* INCLUDE FILES: SETJUMinfstack[io_infsp] -> bufp++] & CMASK : \
+	# X     (long) io_fillbuf())
+	# X
+	# X#define io_eof() (io_infsp == -1)
+	# X#define io_not_eof() (io_infsp > -1)
+	# X
+	# X#define io_source() (io_infstack[io_infsp] -> fn)
+	# X#define io_line() (io_infstack[io_infsp] -> ln)
+	# X#define io_newline() (++io_line())
+	# X
+	# XINT  io_path();
+	# XINT  io_infile();
+	# XINT  io_fillbuf();
+	# X
+	# XVOID io_flush();
+	# X
+	# XVOID io_skip();
+	# XVOID io_scan();
+	# XVOID io_skipspace();
+	# X
+	# XVOID io_initiate();
+	# XVOID io_finish();
+	# END_OF_src/io.h
+	# if test 1693 -ne `wc -c <src/io.h`; then
+	#     echo shar: \"src/io.h\" unpacked with wrong size!
+	# fi
+	# # end of overwriting check
+	# fi
	if test -f src/memory.c -a "${1}" != "-c" ; then 
	  echo shar: Will not over-write existing file \"src/memory.c\"
	else


Hope this helps!

kEITHe