浏览代码

* update makefiles for testing
* update example which did not compile

carl 23 年之前
父节点
当前提交
3bd6280073

+ 24 - 1
docs/Makefile

@@ -164,8 +164,10 @@ help:
 	@echo ' txt           : dvi, convert to text using dvi2tty'
 	@echo ' txt           : dvi, convert to text using dvi2tty'
 	@echo ' htm           : Convert .html to .htm files, zip result'
 	@echo ' htm           : Convert .html to .htm files, zip result'
 	@echo ' clean         : Clean up the mess.'
 	@echo ' clean         : Clean up the mess.'
+	@echo ' examples      : Comple all generic examples'
 	@echo ' linuxexamples : Compile all examples for linux'
 	@echo ' linuxexamples : Compile all examples for linux'
 	@echo ' dosexamples   : Compile all examples for dos'
 	@echo ' dosexamples   : Compile all examples for dos'
+	@echo ' execute       : Execute examples (DOS/Windows/OS/2 only)'
 	@echo ' htmldist      : html, and rchive result.'
 	@echo ' htmldist      : html, and rchive result.'
 	@echo ' psdist        : ps, and archive result.'
 	@echo ' psdist        : ps, and archive result.'
 	@echo ' pdfdist       : pdf, and archive result.'
 	@echo ' pdfdist       : pdf, and archive result.'
@@ -538,6 +540,7 @@ examples:
 	$(MAKE) -C crtex
 	$(MAKE) -C crtex
 	$(MAKE) -C dosex
 	$(MAKE) -C dosex
 	$(MAKE) -C optex
 	$(MAKE) -C optex
+	$(MAKE) -C mathex
 	$(MAKE) -C printex
 	$(MAKE) -C printex
 	$(MAKE) -C refex
 	$(MAKE) -C refex
 	$(MAKE) -C stringex
 	$(MAKE) -C stringex
@@ -554,11 +557,31 @@ linuxexamples: examples
 	$(MAKE) -C linuxex
 	$(MAKE) -C linuxex
 	$(MAKE) -C sockex
 	$(MAKE) -C sockex
 	$(MAKE) -C ipcex
 	$(MAKE) -C ipcex
+	
+execute:
+	$(MAKE) -C dosex all
+	$(MAKE) -C dosex execute
+	$(MAKE) -C refex all
+	$(MAKE) -C refex execute
+	$(MAKE) -C mathex all
+	$(MAKE) -C mathex execute
+	$(MAKE) -C stringex all
+	$(MAKE) -C stringex execute
+	$(MAKE) -C objectex all
+	$(MAKE) -C objectex execute
+	$(MAKE) -C sysutex all
+	$(MAKE) -C sysutex execute
+	$(MAKE) -C typinfex all
+	$(MAKE) -C typinfex execute
 
 
 
 
 #
 #
 # $Log$
 # $Log$
-# Revision 1.14  2002-04-23 18:03:50  michael
+# Revision 1.15  2002-11-10 12:22:10  carl
+#   * update makefiles for testing
+#   * update example which did not compile
+#
+# Revision 1.14  2002/04/23 18:03:50  michael
 # + removed fcl target in HTML
 # + removed fcl target in HTML
 #
 #
 # Revision 1.13  2002/03/19 14:33:18  pierre
 # Revision 1.13  2002/03/19 14:33:18  pierre

+ 1 - 0
docs/crtex/Makefile

@@ -46,6 +46,7 @@ onetex : tex
 
 
 clean : 
 clean : 
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
+	rm -f *.ow *.sw *.exe *.dll
  
  
 $(OBJECTS): %: %.pp
 $(OBJECTS): %: %.pp
 	$(PP) $(PPOPTS) $*
 	$(PP) $(PPOPTS) $*

+ 14 - 3
docs/dosex/Makefile

@@ -28,15 +28,20 @@ ifdef UNITDIR
 PPOPTS:=$(PPOPTS) -Up$(UNITDIR);
 PPOPTS:=$(PPOPTS) -Up$(UNITDIR);
 endif
 endif
 
 
-.SUFFIXES: .pp .tex
+.SUFFIXES: .pp .tex .log .exe
 
 
-.PHONY: all tex clean
+.PHONY: all tex clean execute
 
 
 OBJECTS=ex1 ex2 ex3 ex4 ex5 ex6 ex7 ex8 ex9 ex10 ex11 ex12 ex13 ex14 \
 OBJECTS=ex1 ex2 ex3 ex4 ex5 ex6 ex7 ex8 ex9 ex10 ex11 ex12 ex13 ex14 \
 #        ex15 ex16
 #        ex15 ex16
 
 
 TEXOBJECTS=$(addsuffix .tex, $(OBJECTS))
 TEXOBJECTS=$(addsuffix .tex, $(OBJECTS))
 
 
+LOGFILE=$(addsuffix .log, $(OBJECTS))
+
+
+execute: $(LOGFILE)
+
 all : $(OBJECTS)
 all : $(OBJECTS)
 
 
 tex : $(TEXOBJECTS)
 tex : $(TEXOBJECTS)
@@ -46,9 +51,15 @@ onetex : tex
 
 
 clean : 
 clean : 
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
- 
+	rm -f *.ow *.sw *.exe *.dll *.log *.tmp
+	
+	
 $(OBJECTS): %: %.pp
 $(OBJECTS): %: %.pp
 	$(PP) $(PPOPTS) $*
 	$(PP) $(PPOPTS) $*
+	
+$(LOGFILE): %.log: %.exe 
+	$* > $*.log
+	
 
 
 $(TEXOBJECTS): %.tex: %.pp head.tex foot.tex
 $(TEXOBJECTS): %.tex: %.pp head.tex foot.tex
 	$(PP2TEX) $*
 	$(PP2TEX) $*

+ 1 - 0
docs/dynlibex/Makefile

@@ -45,6 +45,7 @@ onetex : tex
 
 
 clean : 
 clean : 
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
+	rm -f *.ow *.sw *.exe *.dll
  
  
 $(OBJECTS): %: %.pp
 $(OBJECTS): %: %.pp
 	$(PP) $(PPOPTS) $*
 	$(PP) $(PPOPTS) $*

+ 1 - 0
docs/go32ex/Makefile

@@ -46,6 +46,7 @@ onetex : tex
 
 
 clean : 
 clean : 
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
+	rm -f *.ow *.sw *.exe *.dll
  
  
 $(OBJECTS): %: %.pp
 $(OBJECTS): %: %.pp
 	$(PP) $(PPOPTS) $*
 	$(PP) $(PPOPTS) $*

+ 1 - 0
docs/graphex/Makefile

@@ -45,6 +45,7 @@ onetex : tex
 
 
 clean : 
 clean : 
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
+	rm -f *.ow *.sw *.exe *.dll
  
  
 $(OBJECTS): %: %.pp
 $(OBJECTS): %: %.pp
 	$(PP) $(PPOPTS) $*
 	$(PP) $(PPOPTS) $*

+ 1 - 0
docs/heapex/Makefile

@@ -45,6 +45,7 @@ onetex : tex
 
 
 clean : 
 clean : 
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
+	rm -f *.ow *.sw *.exe *.dll
  
  
 $(OBJECTS): %: %.pp
 $(OBJECTS): %: %.pp
 	$(PP) $(PPOPTS) $*
 	$(PP) $(PPOPTS) $*

+ 1 - 0
docs/ipcex/Makefile

@@ -45,6 +45,7 @@ onetex : tex
 
 
 clean : 
 clean : 
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
+	rm -f *.ow *.sw *.exe *.dll
  
  
 $(OBJECTS): %: %.pp
 $(OBJECTS): %: %.pp
 	$(PP) $(PPOPTS) $*
 	$(PP) $(PPOPTS) $*

+ 1 - 0
docs/kbdex/Makefile

@@ -47,6 +47,7 @@ onetex : tex
 clean : 
 clean : 
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS) logkeys.ppu logkeys.o
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS) logkeys.ppu logkeys.o
 	rm -f keyboard.log
 	rm -f keyboard.log
+	rm -f *.ow *.sw *.exe *.dll
  
  
 $(OBJECTS): %: %.pp
 $(OBJECTS): %: %.pp
 	$(PP) $(PPOPTS) $*
 	$(PP) $(PPOPTS) $*

+ 1 - 0
docs/linuxex/Makefile

@@ -51,6 +51,7 @@ onetex : tex
 
 
 clean : 
 clean : 
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
+	rm -f *.ow *.sw *.exe *.dll
  
  
 $(OBJECTS): %: %.pp
 $(OBJECTS): %: %.pp
 	$(PP) $(PPOPTS) $*
 	$(PP) $(PPOPTS) $*

+ 18 - 1
docs/mathex/Makefile

@@ -30,7 +30,7 @@ endif
 
 
 .SUFFIXES: .pp .tex
 .SUFFIXES: .pp .tex
 
 
-.PHONY: all tex clean
+.PHONY: all tex clean execute
 
 
 OBJECTS=ex1 ex2 ex3 ex4 ex5 ex6 ex7 ex8 ex9 ex10 \
 OBJECTS=ex1 ex2 ex3 ex4 ex5 ex6 ex7 ex8 ex9 ex10 \
         ex11 ex12 ex13 ex14 ex15 ex16 ex17 ex18 ex19 ex20 \
         ex11 ex12 ex13 ex14 ex15 ex16 ex17 ex18 ex19 ex20 \
@@ -40,18 +40,35 @@ OBJECTS=ex1 ex2 ex3 ex4 ex5 ex6 ex7 ex8 ex9 ex10 \
 
 
 TEXOBJECTS=$(addsuffix .tex, $(OBJECTS))
 TEXOBJECTS=$(addsuffix .tex, $(OBJECTS))
 
 
+# This is not the same list as objects, since some of the
+# tests are interactive.
+TOTEST=ex1 ex2 ex3 ex4 ex5 ex6 ex7 ex8 ex9 ex10 \
+        ex11 ex12 ex13 ex14 ex15 ex16 ex17 ex18 ex19 ex20 \
+        ex21 ex22 ex23 ex24 ex25 ex26 ex27 ex28 ex29 ex30 \
+        ex31 ex32 ex33 ex34 ex35 ex36 ex37 ex38 ex39 ex40 \
+        ex41 ex42 ex43 ex44 ex45 ex46 ex47 ex48 ex49 ex50
+LOGFILE=$(addsuffix .log, $(TOTEST))
+
+
 all : $(OBJECTS)
 all : $(OBJECTS)
 
 
 tex : $(TEXOBJECTS)
 tex : $(TEXOBJECTS)
 
 
+execute: $(LOGFILE)
+
+
 onetex : tex
 onetex : tex
 	$(MAKETEX) $(TEXOBJECTS)
 	$(MAKETEX) $(TEXOBJECTS)
 
 
 clean : 
 clean : 
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
+	rm -f *.ow *.sw *.exe *.dll *.log *.tmp
  
  
 $(OBJECTS): %: %.pp
 $(OBJECTS): %: %.pp
 	$(PP) $(PPOPTS) $*
 	$(PP) $(PPOPTS) $*
 
 
 $(TEXOBJECTS): %.tex: %.pp head.tex foot.tex
 $(TEXOBJECTS): %.tex: %.pp head.tex foot.tex
 	$(PP2TEX) $*
 	$(PP2TEX) $*
+
+$(LOGFILE): %.log: %.exe 
+	$* > $*.log

+ 1 - 1
docs/mathex/ex14.pp

@@ -7,7 +7,7 @@ Uses math;
 Procedure dofrexp(Const X : extended);
 Procedure dofrexp(Const X : extended);
 
 
 var man : extended;
 var man : extended;
-    exp: integer;
+    exp: longint;
 
 
 begin
 begin
   man:=0;
   man:=0;

+ 1 - 0
docs/mmouseex/Makefile

@@ -46,6 +46,7 @@ onetex : tex
 
 
 clean : 
 clean : 
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
+	rm -f *.ow *.sw *.exe *.dll
  
  
 $(OBJECTS): %: %.pp
 $(OBJECTS): %: %.pp
 	$(PP) $(PPOPTS) $*
 	$(PP) $(PPOPTS) $*

+ 1 - 0
docs/mouseex/Makefile

@@ -47,6 +47,7 @@ onetex : tex
 
 
 clean : 
 clean : 
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
+	rm -f *.ow *.sw *.exe *.dll
  
  
 $(OBJECTS): %: %.pp
 $(OBJECTS): %: %.pp
 	$(PP) $(PPOPTS) $*
 	$(PP) $(PPOPTS) $*

+ 18 - 1
docs/objectex/Makefile

@@ -30,12 +30,22 @@ endif
 
 
 .SUFFIXES: .pp .tex
 .SUFFIXES: .pp .tex
 
 
-.PHONY: all tex clean
+.PHONY: all tex clean execute
 
 
 OBJECTS=ex1 ex2 ex3 ex4 ex5 ex6 ex7 ex8 ex9 ex10 \
 OBJECTS=ex1 ex2 ex3 ex4 ex5 ex6 ex7 ex8 ex9 ex10 \
         ex11 ex12 ex13 ex14 ex15 ex16 ex17 ex18 ex19 ex20 \
         ex11 ex12 ex13 ex14 ex15 ex16 ex17 ex18 ex19 ex20 \
         ex21 ex22 ex23 ex24 ex25 ex26 ex27 ex28 ex29 ex30 \
         ex21 ex22 ex23 ex24 ex25 ex26 ex27 ex28 ex29 ex30 \
         ex31 ex32 ex33 ex34 ex35 ex36 ex37 ex38 ex39 ex40 
         ex31 ex32 ex33 ex34 ex35 ex36 ex37 ex38 ex39 ex40 
+        
+# This might not be the same list as objects, since some of the
+# tests might be interactive.
+TOTEST=ex1 ex2 ex3 ex4 ex5 ex6 ex7 ex8 ex9 ex10 \
+        ex11 ex12 ex13 ex14 ex15 ex16 ex17 ex18 ex19 ex20 \
+        ex21 ex22 ex23 ex24 ex25 ex26 ex27 ex28 ex29 ex30 \
+        ex31 ex32 ex33 ex34 ex35 ex37 ex38 ex39 ex40 
+        
+LOGFILE=$(addsuffix .log, $(TOTEST))
+        
 
 
 TEXOBJECTS=$(addsuffix .tex, $(OBJECTS))
 TEXOBJECTS=$(addsuffix .tex, $(OBJECTS))
 
 
@@ -43,14 +53,21 @@ all : $(OBJECTS)
 
 
 tex : $(TEXOBJECTS) myobject.tex mysortc.tex
 tex : $(TEXOBJECTS) myobject.tex mysortc.tex
 
 
+execute: $(LOGFILE)
+
+
 onetex : tex
 onetex : tex
 	$(MAKETEX) $(TEXOBJECTS)
 	$(MAKETEX) $(TEXOBJECTS)
 
 
 clean : 
 clean : 
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS) mysortc.ppu myobject.ppu mysortc.tex myobject.tex test.dat
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS) mysortc.ppu myobject.ppu mysortc.tex myobject.tex test.dat
+	rm -f *.ow *.sw *.exe *.dll *.ppw
  
  
 $(OBJECTS): %: %.pp
 $(OBJECTS): %: %.pp
 	$(PP) $(PPOPTS) $*
 	$(PP) $(PPOPTS) $*
 
 
 $(TEXOBJECTS) myobject.tex mysortc.tex: %.tex: %.pp head.tex foot.tex
 $(TEXOBJECTS) myobject.tex mysortc.tex: %.tex: %.pp head.tex foot.tex
 	$(PP2TEX) $*
 	$(PP2TEX) $*
+
+$(LOGFILE): %.log: %.exe 
+	$* > $*.log

+ 1 - 0
docs/optex/Makefile

@@ -45,6 +45,7 @@ onetex : tex
 
 
 clean : 
 clean : 
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
+	rm -f *.ow *.sw *.exe *.dll
  
  
 $(OBJECTS): %: %.pp
 $(OBJECTS): %: %.pp
 	$(PP) $(PPOPTS) $*
 	$(PP) $(PPOPTS) $*

+ 1 - 0
docs/printex/Makefile

@@ -45,6 +45,7 @@ onetex : tex
 
 
 clean : 
 clean : 
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
+	rm -f *.ow *.sw *.exe *.dll
  
  
 $(OBJECTS): %: %.pp
 $(OBJECTS): %: %.pp
 	$(PP) $(PPOPTS) $*
 	$(PP) $(PPOPTS) $*

+ 1 - 0
docs/progex/Makefile

@@ -51,6 +51,7 @@ onetex : tex
 
 
 clean : 
 clean : 
 	rm -f *.o *.s *.so $(OBJECTS) $(COBJECTS) $(TEXOBJECTS) $(CTEXOBJECTS)
 	rm -f *.o *.s *.so $(OBJECTS) $(COBJECTS) $(TEXOBJECTS) $(CTEXOBJECTS)
+	rm -f *.ow *.sw *.exe *.dll
  
  
 $(OBJECTS): %: %.pp $(LIBOBJECT)
 $(OBJECTS): %: %.pp $(LIBOBJECT)
 	$(PP) $(PPOPTS) $*
 	$(PP) $(PPOPTS) $*

+ 21 - 1
docs/refex/Makefile

@@ -30,7 +30,7 @@ endif
 
 
 .SUFFIXES: .pp .tex
 .SUFFIXES: .pp .tex
 
 
-.PHONY: all tex clean
+.PHONY: all tex clean execute
 
 
 OBJECTS=ex1 ex2 ex3 ex4 ex5 ex6 ex7 ex8 ex9 ex10 ex11 ex12 ex13 ex14 \
 OBJECTS=ex1 ex2 ex3 ex4 ex5 ex6 ex7 ex8 ex9 ex10 ex11 ex12 ex13 ex14 \
         ex15 ex16 ex17 ex18 ex19 ex20 ex21 ex22 ex23 ex24 ex25 ex26 ex27 \
         ex15 ex16 ex17 ex18 ex19 ex20 ex21 ex22 ex23 ex24 ex25 ex26 ex27 \
@@ -44,18 +44,38 @@ OBJECTS=ex1 ex2 ex3 ex4 ex5 ex6 ex7 ex8 ex9 ex10 ex11 ex12 ex13 ex14 \
 
 
 TEXOBJECTS=$(addsuffix .tex, $(OBJECTS))
 TEXOBJECTS=$(addsuffix .tex, $(OBJECTS))
 
 
+# This is not the same list as objects, since some of the
+# tests are interactive.
+TOTEST=ex1 ex2 ex3 ex4 ex5 ex8 ex9 ex10 ex11 ex12 ex13 ex14 \
+        ex15 ex16 ex17 ex20 ex21 ex22 ex23 ex25 ex26 ex27 \
+        ex28 ex29 ex31 ex32 ex33 ex34 ex36 ex37 ex38 ex39 ex40 \
+        ex41 ex42 ex43 ex44 ex45 ex47 ex48 ex52 ex53 \
+        ex54 ex56 ex59 ex60 ex62 ex63 ex64 ex65 ex66 \
+        ex67 ex68 ex69 ex70 ex71 ex72 ex73 ex75 ex76 ex78 ex79 \
+	ex80 ex81 ex82 ex83  ex85 ex86 ex87 ex88 ex89 \
+	ex90 ex91 ex92 ex93 ex96 ex97 ex98 ex99 ex100 ex101 ex102\
+        ex103 ex104 ex105 ex106 ex107 ex108 ex109 ex110 ex111 ex112
+LOGFILE=$(addsuffix .log, $(TOTEST))
+
+
 all : $(OBJECTS)
 all : $(OBJECTS)
 
 
 tex : $(TEXOBJECTS)
 tex : $(TEXOBJECTS)
 
 
+execute: $(LOGFILE)
+
 onetex : tex
 onetex : tex
 	$(MAKETEX) $(TEXOBJECTS)
 	$(MAKETEX) $(TEXOBJECTS)
 
 
 clean : 
 clean : 
 	rm -f *.o *.s *.rst $(OBJECTS) $(TEXOBJECTS)
 	rm -f *.o *.s *.rst $(OBJECTS) $(TEXOBJECTS)
+	rm -f *.ow *.sw *.exe *.dll *.log *.tmp
  
  
 $(OBJECTS): %: %.pp
 $(OBJECTS): %: %.pp
 	$(PP) $(PPOPTS) $*
 	$(PP) $(PPOPTS) $*
 
 
 $(TEXOBJECTS): %.tex: %.pp head.tex foot.tex
 $(TEXOBJECTS): %.tex: %.pp head.tex foot.tex
 	$(PP2TEX) $*
 	$(PP2TEX) $*
+
+$(LOGFILE): %.log: %.exe 
+	$* > $*.log

+ 1 - 1
docs/refex/ex112.pp

@@ -10,5 +10,5 @@ begin
   For I:=1 to 10 do
   For I:=1 to 10 do
     Writeln (OctStr(Value,I));
     Writeln (OctStr(Value,I));
   For I:=1 to 16 do
   For I:=1 to 16 do
-    Writeln (OctStr(I),3);
+    Writeln (OctStr(I,3));
 end.
 end.

+ 1 - 1
docs/refex/ex23.pp

@@ -8,7 +8,7 @@ Var F : File of Longint;
 begin
 begin
   { Fill a file with data : 
   { Fill a file with data : 
     Each position contains the position ! }
     Each position contains the position ! }
-  Assign (F,'test.dat');
+  Assign (F,'test.tmp');
   Rewrite (F);
   Rewrite (F);
   For L:=0 to 100 do
   For L:=0 to 100 do
     begin
     begin

+ 1 - 1
docs/refex/ex52.pp

@@ -6,7 +6,7 @@ Var F : File;
     I : longint;
     I : longint;
 
 
 begin
 begin
-  Assign (F,'Test.dat');
+  Assign (F,'Test.tmp');
   { Create the file. Recordsize is 4 } 
   { Create the file. Recordsize is 4 } 
   Rewrite (F,Sizeof(I));
   Rewrite (F,Sizeof(I));
   For I:=1 to 10 do
   For I:=1 to 10 do

+ 1 - 1
docs/refex/ex56.pp

@@ -8,7 +8,7 @@ Var
   
   
 begin
 begin
   { Create a file and fill it with data } 
   { Create a file and fill it with data } 
-  Assign (F,'test.dat');
+  Assign (F,'test.tmp');
   Rewrite(F); { Create file }
   Rewrite(F); { Create file }
   Close(f);   
   Close(f);   
   FileMode:=2;
   FileMode:=2;

+ 1 - 1
docs/refex/ex71.pp

@@ -6,7 +6,7 @@ Var F : File of longint;
     I,L : Longint;
     I,L : Longint;
     
     
 begin
 begin
-  Assign (F,'test.dat');
+  Assign (F,'test.tmp');
   Rewrite (F);
   Rewrite (F);
   For I:=1 to 10 Do 
   For I:=1 to 10 Do 
     Write (F,I);
     Write (F,I);

+ 1 - 1
docs/refex/ex75.pp

@@ -10,7 +10,7 @@ begin
   Write ('This is on the first line ! '); { No CR/LF pair! }
   Write ('This is on the first line ! '); { No CR/LF pair! }
   Writeln ('And this too...');
   Writeln ('And this too...');
   Writeln ('But this is already on the second line...');
   Writeln ('But this is already on the second line...');
-  Assign (f,'test.dat');
+  Assign (f,'test.tmp');
   Rewrite (f);
   Rewrite (f);
   For L:=1 to 10 do 
   For L:=1 to 10 do 
     write (F,L); { No writeln allowed here ! }
     write (F,L); { No writeln allowed here ! }

+ 1 - 1
docs/refex/ex88.pp

@@ -7,7 +7,7 @@ Program Example88;
 Var F : text;
 Var F : text;
 
 
 begin
 begin
-  AssignFile(F,'textfile.txt');
+  AssignFile(F,'textfile.tmp');
   Rewrite(F);
   Rewrite(F);
   Writeln (F,'This is a silly example of AssignFile and CloseFile.');
   Writeln (F,'This is a silly example of AssignFile and CloseFile.');
   CloseFile(F);
   CloseFile(F);

+ 1 - 0
docs/sockex/Makefile

@@ -45,6 +45,7 @@ onetex : tex
 
 
 clean : 
 clean : 
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
+	rm -f *.ow *.sw *.exe *.dll
  
  
 $(OBJECTS): %: %.pp
 $(OBJECTS): %: %.pp
 	$(PP) $(PPOPTS) $*
 	$(PP) $(PPOPTS) $*

+ 14 - 1
docs/stringex/Makefile

@@ -30,14 +30,23 @@ endif
 
 
 .SUFFIXES: .pp .tex
 .SUFFIXES: .pp .tex
 
 
-.PHONY: all tex clean
+.PHONY: all tex clean execute
 
 
 OBJECTS=ex1 ex2 ex3 ex4 ex5 ex6 ex7 ex8 ex9 ex10 ex11 ex12 ex13 ex14 ex15 ex16 ex17
 OBJECTS=ex1 ex2 ex3 ex4 ex5 ex6 ex7 ex8 ex9 ex10 ex11 ex12 ex13 ex14 ex15 ex16 ex17
 
 
+# This might not be the same list as objects, since some of the
+# tests might be interactive.
+TOTEST=ex1 ex2 ex3 ex4 ex5 ex6 ex7 ex8 ex9 ex10 ex11 ex12 ex13 ex14 ex15 ex16 ex17
+LOGFILE=$(addsuffix .log, $(TOTEST))
+
+
 TEXOBJECTS=$(addsuffix .tex, $(OBJECTS))
 TEXOBJECTS=$(addsuffix .tex, $(OBJECTS))
 
 
 all : $(OBJECTS)
 all : $(OBJECTS)
 
 
+execute: $(LOGFILE)
+
+
 tex : $(TEXOBJECTS)
 tex : $(TEXOBJECTS)
 
 
 onetex : tex
 onetex : tex
@@ -45,9 +54,13 @@ onetex : tex
 
 
 clean : 
 clean : 
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
+	rm -f *.ow *.sw *.exe *.dll *.log *.tmp
  
  
 $(OBJECTS): %: %.pp
 $(OBJECTS): %: %.pp
 	$(PP) $(PPOPTS) $*
 	$(PP) $(PPOPTS) $*
 
 
 $(TEXOBJECTS): %.tex: %.pp head.tex foot.tex
 $(TEXOBJECTS): %.tex: %.pp head.tex foot.tex
 	$(PP2TEX) $*
 	$(PP2TEX) $*
+
+$(LOGFILE): %.log: %.exe 
+	$* > $*.log

+ 21 - 1
docs/sysutex/Makefile

@@ -30,7 +30,7 @@ endif
 
 
 .SUFFIXES: .pp .tex
 .SUFFIXES: .pp .tex
 
 
-.PHONY: all tex clean
+.PHONY: all tex clean execute
 
 
 OBJECTS=ex1 ex2 ex3 ex4 ex5 ex6 ex7 ex8 ex9 ex10 ex11 ex12\
 OBJECTS=ex1 ex2 ex3 ex4 ex5 ex6 ex7 ex8 ex9 ex10 ex11 ex12\
         ex13 ex14 ex15 ex16 ex17 ex18 ex19 ex20 ex21 ex22 ex23 ex24\
         ex13 ex14 ex15 ex16 ex17 ex18 ex19 ex20 ex21 ex22 ex23 ex24\
@@ -40,11 +40,27 @@ OBJECTS=ex1 ex2 ex3 ex4 ex5 ex6 ex7 ex8 ex9 ex10 ex11 ex12\
         ex59 ex60 ex61 ex62 ex63 ex64 ex65 ex66 ex67 ex68 ex69 ex70\
         ex59 ex60 ex61 ex62 ex63 ex64 ex65 ex66 ex67 ex68 ex69 ex70\
         ex71 ex72 ex73 ex74 ex75 ex76 ex77 ex78 ex79 ex80 \
         ex71 ex72 ex73 ex74 ex75 ex76 ex77 ex78 ex79 ex80 \
         ex81 ex82 ex83 ex84 ex85 ex86 ex87 ex88
         ex81 ex82 ex83 ex84 ex85 ex86 ex87 ex88
+        
+# This might not be the same list as objects, since some of the
+# tests might be interactive.
+TOTEST=ex1 ex2 ex3 ex4 ex5 ex6 ex7 ex8 ex9 ex10 ex11 ex12\
+        ex13 ex14 ex15 ex16 ex17 ex18 ex19 ex20 ex21 ex22 ex23 ex24\
+        ex25 ex26 ex27 ex28 ex29 ex30 ex31 ex32 ex35 ex36\
+        ex37 ex39 ex41 ex42 ex43 ex44 ex45 ex46 ex47\
+        ex48 ex49 ex50 ex51 ex52 ex53 ex54 ex55 ex56 ex57 ex58\
+        ex59 ex60 ex61 ex62 ex63 ex64 ex65 ex66 ex67 ex68 ex69 ex70\
+        ex72 ex73 ex74 ex75 ex76 ex77 ex78 ex79 ex80 \
+        ex81 ex82 ex83 ex84 ex85 ex86 ex87 ex88
+
+LOGFILE=$(addsuffix .log, $(TOTEST))
+        
 
 
 TEXOBJECTS=$(addsuffix .tex, $(OBJECTS))
 TEXOBJECTS=$(addsuffix .tex, $(OBJECTS))
 
 
 all : $(OBJECTS)
 all : $(OBJECTS)
 
 
+execute: $(LOGFILE)
+
 tex : $(TEXOBJECTS)
 tex : $(TEXOBJECTS)
 
 
 onetex : tex
 onetex : tex
@@ -52,9 +68,13 @@ onetex : tex
 
 
 clean : 
 clean : 
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
+	rm -f *.ow *.sw *.exe *.dll *.ppw *.tmp *.log *.dat
  
  
 $(OBJECTS): %: %.pp
 $(OBJECTS): %: %.pp
 	$(PP) $(PPOPTS) $*
 	$(PP) $(PPOPTS) $*
 
 
 $(TEXOBJECTS): %.tex: %.pp head.tex foot.tex
 $(TEXOBJECTS): %.tex: %.pp head.tex foot.tex
 	$(PP2TEX) $*
 	$(PP2TEX) $*
+
+$(LOGFILE): %.log: %.exe 
+	$* > $*.log

+ 18 - 1
docs/typinfex/Makefile

@@ -30,15 +30,26 @@ endif
 
 
 .SUFFIXES: .pp .tex
 .SUFFIXES: .pp .tex
 
 
-.PHONY: all tex clean
+.PHONY: all tex clean execute
 
 
 OBJECTS=rttiobj trtti1 trtti2 trtti3 ex1 ex2 ex3 ex4 ex5 ex6 ex7 ex8 ex9 \
 OBJECTS=rttiobj trtti1 trtti2 trtti3 ex1 ex2 ex3 ex4 ex5 ex6 ex7 ex8 ex9 \
         ex10 ex11 ex12 ex13  ex14 ex15 ex16 ex17 ex18
         ex10 ex11 ex12 ex13  ex14 ex15 ex16 ex17 ex18
+        
+# This might not be the same list as objects, since some of the
+# tests might be interactive.
+TOTEST=trtti1 trtti2 trtti3 ex1 ex2 ex3 ex4 ex5 ex6 ex7 ex8 ex9 \
+        ex10 ex11 ex12 ex13  ex14 ex15 ex16 ex17 ex18
+        
+LOGFILE=$(addsuffix .log, $(TOTEST))
+        
 
 
 TEXOBJECTS=$(addsuffix .tex, $(OBJECTS))
 TEXOBJECTS=$(addsuffix .tex, $(OBJECTS))
 
 
 all : $(OBJECTS)
 all : $(OBJECTS)
 
 
+execute: $(LOGFILE)
+
+
 tex : $(TEXOBJECTS)
 tex : $(TEXOBJECTS)
 
 
 onetex : tex
 onetex : tex
@@ -46,9 +57,15 @@ onetex : tex
 
 
 clean : 
 clean : 
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS) rttiobj.ppu
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS) rttiobj.ppu
+	rm -f *.ow *.sw *.exe *.dll *.tmp *.log rttiobj.ppw
  
  
 $(OBJECTS): %: %.pp
 $(OBJECTS): %: %.pp
 	$(PP) $(PPOPTS) $*
 	$(PP) $(PPOPTS) $*
+	
+	
 
 
 $(TEXOBJECTS): %.tex: %.pp head.tex foot.tex
 $(TEXOBJECTS): %.tex: %.pp head.tex foot.tex
 	$(PP2TEX) $*
 	$(PP2TEX) $*
+
+$(LOGFILE): %.log: %.exe 
+	$* > $*.log

+ 1 - 0
docs/videoex/Makefile

@@ -49,6 +49,7 @@ onetex : tex
 clean : 
 clean : 
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
 	rm -f *.o *.s $(OBJECTS) $(TEXOBJECTS)
 	rm -f vidutil.ppu vidutil.o viddbg.ppu viddbg.o Video.log
 	rm -f vidutil.ppu vidutil.o viddbg.ppu viddbg.o Video.log
+	rm -f *.ow *.sw *.exe *.dll
  
  
 $(OBJECTS): %: %.pp vidutil.ppu
 $(OBJECTS): %: %.pp vidutil.ppu
 	$(PP) $(PPOPTS) $*
 	$(PP) $(PPOPTS) $*