Unicode: Work around input/output redirection issues with the windows build environment.

src/post_modules/Unicode/Makefile.in

@@ -16,23 +16,23 @@ unicode_module.o: $(SRCDIR)/unicode_module.c
 
 $(SRCDIR)/decompositions.h: $(SRCDIR)/make_decompose.pike $(SRCDIR)/$(UNICODEDATA)
 	 $(RUNPIKE) $(SRCDIR)/make_decompose.pike 		\
-                    < $(SRCDIR)/$(UNICODEDATA) > "$@" || { rm "$@"; exit 1; }
+                    $(SRCDIR)/$(UNICODEDATA) "$@" || { rm "$@"; exit 1; }
 
 $(SRCDIR)/canonicals.h: $(SRCDIR)/make_canonicals.pike $(SRCDIR)/$(UNICODEDATA)
 	 $(RUNPIKE) $(SRCDIR)/make_canonicals.pike 		\
-                    < $(SRCDIR)/$(UNICODEDATA) > "$@" || { rm "$@"; exit 1; }
+                     $(SRCDIR)/$(UNICODEDATA)  "$@" || { rm "$@"; exit 1; }
 
 $(SRCDIR)/wordbits.h: $(SRCDIR)/make_wordbits.pike $(SRCDIR)/$(UNICODEDATA)
 	 $(RUNPIKE) $(SRCDIR)/make_wordbits.pike 		\
-                    < $(SRCDIR)/$(UNICODEDATA) > "$@" || { rm "$@"; exit 1; }
+                     $(SRCDIR)/$(UNICODEDATA) "$@" || { rm "$@"; exit 1; }
 
 $(SRCDIR)/uversion.h: $(SRCDIR)/make_uversion.pike $(SRCDIR)/$(UNICODEDATARM)
 	 $(RUNPIKE) $(SRCDIR)/make_uversion.pike		\
-                    $(SRCDIR)/$(UNICODEDATARM) > "$@" || { rm "$@"; exit 1; }
+                    $(SRCDIR)/$(UNICODEDATARM) "$@" || { rm "$@"; exit 1; }
 
 $(SRCDIR)/rtl.h: $(SRCDIR)/make_rtl.pike $(SRCDIR)/$(UNICODEDATA)
 	$(RUNPIKE) $(SRCDIR)/make_rtl.pike			\
-		< $(SRCDIR)/$(UNICODEDATA) > "$@" || { rm "$@"; exit 1; }
+		$(SRCDIR)/$(UNICODEDATA) "$@" || { rm "$@"; exit 1; }
 
 unicode_module.o: $(SRCDIR)/unicode_module.c $(SRCDIR)/wordbits.h         \
 		  $(SRCDIR)/canonicals.h     			\

src/post_modules/Unicode/make_canonicals.pike

 
-void main()
+void main(int argc, array(string) argv)
 {
+  function write = Stdio.File(argv[2], "wct")->write;
   mapping classes = ([]);
-  foreach( Stdio.stdin.read()/"\n", string line )
+  foreach( Stdio.read_file(argv[1])/"\n", string line )
   {
     sscanf( line, "%s#", line );
     if( !sizeof( line ) )

src/post_modules/Unicode/make_decompose.pike

 
-void main()
+void main(int argc, array(string) argv)
 {
+  function write = Stdio.File(argv[2], "wct")->write;
 
   multiset dont = (<
     /* Script Specifics */
@@ -42,7 +43,7 @@ void main()
     return c;
   };
 
-  foreach( Stdio.stdin.read()/"\n", string line )
+  foreach( Stdio.read_file(argv[1])/"\n", string line )
   {
     sscanf( line, "%s#", line );
     if( !sizeof( line ) )

src/post_modules/Unicode/make_rtl.pike

 
-void main()
+void main(int argc, array(string) argv)
 {
+  function write = Stdio.File(argv[2], "cwt")->write;
   write("static const int _rtl[] = {\n");
   int last_mode;
-  foreach( Stdio.stdin.read()/"\n", string line )
+  foreach( Stdio.read_file(argv[1])/"\n", string line )
   {
     sscanf( line, "%s#", line );
     if( !sizeof( line ) )

src/post_modules/Unicode/make_uversion.pike

 
 void main(int n, array args)
 {
-  if(n!=2) exit(1);
+  if(n!=3) exit(1);
   string file = Stdio.read_file(args[1]);
   if(!file) exit(1);
+  function write = Stdio.File(args[2], "cwt")->write;
   string ver;
   sscanf(file, "%*sVersion %s\n", ver);
   if(!ver) exit(1);

src/post_modules/Unicode/make_wordbits.pike

@@ -15,14 +15,15 @@ int parse_type( string s )
   }
 }
 
-void main()
+void main(int argc, array(string) argv)
 {
   int last_was,c,last_c;
+  function write = Stdio.File(argv[2], "cwt")->write;
 
   write( "static const struct {\n"
 	 "  int start; int end;\n"
 	 "} ranges[] = {\n" );
-  foreach( Stdio.stdin.read()/"\n", string line )
+  foreach( Stdio.read_file(argv[1])/"\n", string line )
   {
     sscanf( line, "%s#", line );
     if( !sizeof( line ) )