--- a/parser_old.rhope	Tue Aug 03 23:51:39 2010 -0400
+++ b/parser_old.rhope	Fri Aug 06 01:42:37 2010 -0400
@@ -1029,7 +1029,7 @@
 							If[[before] = [""]]
 							{
 								Print[[["Found "]Append[delim]]Append[" where a named pipe or literal was expected"]]
-								{ Print[["Near: "]Append[ [afterdelim]Slice[40]]] }
+								{ Print[["Near: "]Append[ [afterdelim]Slice[80]]] }
 							}{
 								If[[before]Contains[[params]Global Separator >>]]
 								{
@@ -1322,6 +1322,7 @@
 {
 	,after arglist <- Worker Declaration[string, params]
 	{
+		Print[worker name]
 		worker name <- [~]Name >>
 		body text, modifiers <- [after arglist]Get Comment DString[[params]Block Begin >>, params]
 		modified <- Process Modifiers[~, params, modifiers]
@@ -1509,6 +1510,7 @@
 
 Do Import[tree,file name,unused,params:out]
 {
+	Print[["Parsing: "]Append[file name]]
 	file <- <String@File[file name]
 	,text <- [file]Get FString[[file]Length]
 	after import <- Null[text, params, tree, 0]