minor fixes

docs/go32ex/Makefile

@@ -15,7 +15,7 @@ PP=ppc386
 PPOPTS=
 
 # Script to convert the programs to LaTeX examples which can be included.
-PP2TEX=pp2tex
+PP2TEX=../pp2tex
 
 # Script to collect all examples in 1 file.
 MAKETEX=make1tex

docs/linuxex/ex37.pp

@@ -21,6 +21,7 @@ begin
   close (f);
   chmod ('test21a',octal (755));
   popen (f,'./test21a arg1 arg2','W');
+  rewrite (f);
   if linuxerror<>0 then 
      writeln ('error from POpen : Linuxerror : ', Linuxerror);
   for i:=1 to 10 do 

docs/refex/Makefile

@@ -15,7 +15,7 @@ PP=ppc386
 PPOPTS=
 
 # Script to convert the programs to LaTeX examples which can be included.
-PP2TEX=pp2tex
+PP2TEX=../pp2tex
 
 # Script to collect all examples in 1 file.
 MAKETEX=make1tex

docs/stringex/ex9.pp

@@ -7,6 +7,8 @@ Uses strings;
 Const P1 : PCHAR = 'This is a pchar string.';
       P2 : PCHAR = 'This is a PCHAR string.';
       P3 : PCHAR = 'tHiS iS aLsO a PCHAR string';
+      p4 : pchar = 'AAbcd';
+      p5 : pchar = 'AEbcd';
        
 Var L : Longint;       
        
@@ -16,5 +18,6 @@ begin
   L:=1;
   While StrLIComp (P2,P3,L)=0 do inc(L);
   Dec(L);
-  Writeln (L,'characters, case insensitive.');
+  Writeln (L,' characters, case insensitive.');
+  if strIcomp(p4,p5)=0 then writeln ('This can''t happen!');
 end.