+ Some cleaning up

docs/Makefile

@@ -51,7 +51,7 @@ endif
 ifndef LATEX2HTMLOPTS
 LATEX2HTMLOPTS = -no_reuse -up_url "../fpctoc.html"\
                  -up_title "Free Pascal manuals" -contents_in_navigation\
-                 -html_version 4.0 -split 3 -image_type gif
+                 -html_version 4.0 -split 3 
 endif
 
 # Icons for latex2html
@@ -108,17 +108,20 @@ CHAPTERS = $(addsuffix .tex, crt dos getopts go32 graph linux printer\
              strings objects heaptrc sysutils ipc mouse gpm dxeload \
              emu387 ports math)
 
+GTKPDF=$(addsuffix .pdf,$(addprefix gtk, 1 2 3 4 5))
+
 # Check if ascii-mode requested
 ifeq ($(ASCIIMODE),YES)
 LATEX2HTMLOPTS:=$(LATEX2HTMLOPTS) -ascii_mode
 endif
 
+
 #####################################################################
 # Conversion from types
 #####################################################################
 
 .PHONY: clean dvi help html ps psdist htmldist pdfdist txtdist \
-        htm txt pdf refex alldist messages onechap
+        htm txt pdf refex alldist messages onechap gtk
 
 .SUFFIXES: .dvi .tex .ps .txt .pdf
 
@@ -373,6 +376,18 @@ endif
 
 html: $(HTML)
 
+gtk: $(GTKPDF)
+
+gtk1.pdf: gtk1.tex
+
+gtk2.pdf: gtk2.tex
+
+gtk3.pdf: gtk3.tex
+
+gtk4.pdf: gtk4.tex
+
+gtk5.pdf: gtk5.tex
+
 
 #####################################################################
 # Installation
@@ -484,9 +499,13 @@ linuxexamples: examples
 	$(MAKE) -C sockex
 	$(MAKE) -C ipcex
 
+
 #
 # $Log$
-# Revision 1.4  2000-10-12 10:41:58  peter
+# Revision 1.5  2001-07-10 22:01:15  michael
+# + Some cleaning up
+#
+# Revision 1.4  2000/10/12 10:41:58  peter
 #   * more examples
 #
 # Revision 1.3  2000/09/02 21:51:36  peter

docs/onechap.tex

@@ -47,7 +47,7 @@
 % Start document
 %
 \begin{document}
-\input{crt.tex}
+%\input{crt.tex}
 %\input{dos.tex}
 %\input{dxeload.tex}
 %\input{emu387}
@@ -68,4 +68,5 @@
 %\input{strings.tex}
 %\input{sysutils.tex}
 %\input{makefile.tex}
+\input{classes.tex}
 \end{document}

docs/prog.tex

@@ -22,8 +22,8 @@
 % Preamble.
 % Uncomment the one you need here. The book version is for the published
 % book version.
-\documentclass{report}
-%\documentclass{book}
+%\documentclass{report}
+\documentclass{book}
 %
 % Preamble
 \usepackage{epsfig}
@@ -31,13 +31,14 @@
 \ifx\pdfoutput\undefined
   \usepackage{html}
   \usepackage{htmllist}
-  \latex{\usepackage{fpc}}
+%  \latex{\usepackage{fpc}}
+  \latex{\usepackage{fpcbook}}
   \html{\input{fpc-html.tex}}
 \else
   % Uncomment the fpc or fpcbook version, depending on the output format
   % you want.
-  \usepackage{fpc}
-  %\usepackage{fpcbook}
+%  \usepackage{fpc}
+  \usepackage{fpcbook}
 \fi
 \latex{%
   \ifpdf

docs/ref.tex

@@ -30,13 +30,14 @@
 \ifx\pdfoutput\undefined
   \usepackage{html}
   \usepackage{htmllist}
-  \latex{\usepackage{fpc}}
+%  \latex{\usepackage{fpc}}
+  \latex{\usepackage{fpcbook}}
   \html{\input{fpc-html.tex}}
 \else
 % Uncomment the fpc or fpcbook version, depending on the output format
 % you want.
-  \usepackage{fpc}
-%  \usepackage{fpcbook}
+%  \usepackage{fpc}
+  \usepackage{fpcbook}
 \fi
 \latex{%
   \ifpdf

docs/sysutex/ex43.pp

@@ -2,19 +2,23 @@ Program Example43;
 
 { This program demonstrates the FindFirst function }
 
-Uses sysutils;
+Uses SysUtils;
 
 Var Info : TSearchRec;
     Count : Longint;
 
 Begin
   Count:=0;
-  If FindFirst ('*.pp',faAnyFile,Info)=0 then
+  If FindFirst ('/*',faAnyFile and faDirectory,Info)=0 then
     begin
     Repeat
       Inc(Count);
       With Info do 
+        begin
+        If (Attr and faDirectory) = faDirectory then
+          Write('Dir : ');
         Writeln (Name:40,Size:15);
+        end;
     Until FindNext(info)<>0;
     end;
   FindClose(Info);

docs/sysutex/ex71.pp

@@ -201,4 +201,5 @@ begin
   TestNegativeExponential;
   TestSmallExponential;  
   TestSmallNegExponential;  
+  teststring;
 end.

docs/table.eps

@@ -0,0 +1,169 @@
+%!PS-Adobe-2.0 EPSF-2.0
+%%Title: table.eps
+%%Creator: fig2dev Version 3.2 Patchlevel 3c
+%%CreationDate: Wed Jul 11 02:10:25 2001
+%%For: michael@home ()
+%%BoundingBox: 0 0 128 100
+%%Magnification: 1.0000
+%%EndComments
+/$F2psDict 200 dict def
+$F2psDict begin
+$F2psDict /mtrx matrix put
+/col-1 {0 setgray} bind def
+/col0 {0.000 0.000 0.000 srgb} bind def
+/col1 {0.000 0.000 1.000 srgb} bind def
+/col2 {0.000 1.000 0.000 srgb} bind def
+/col3 {0.000 1.000 1.000 srgb} bind def
+/col4 {1.000 0.000 0.000 srgb} bind def
+/col5 {1.000 0.000 1.000 srgb} bind def
+/col6 {1.000 1.000 0.000 srgb} bind def
+/col7 {1.000 1.000 1.000 srgb} bind def
+/col8 {0.000 0.000 0.560 srgb} bind def
+/col9 {0.000 0.000 0.690 srgb} bind def
+/col10 {0.000 0.000 0.820 srgb} bind def
+/col11 {0.530 0.810 1.000 srgb} bind def
+/col12 {0.000 0.560 0.000 srgb} bind def
+/col13 {0.000 0.690 0.000 srgb} bind def
+/col14 {0.000 0.820 0.000 srgb} bind def
+/col15 {0.000 0.560 0.560 srgb} bind def
+/col16 {0.000 0.690 0.690 srgb} bind def
+/col17 {0.000 0.820 0.820 srgb} bind def
+/col18 {0.560 0.000 0.000 srgb} bind def
+/col19 {0.690 0.000 0.000 srgb} bind def
+/col20 {0.820 0.000 0.000 srgb} bind def
+/col21 {0.560 0.000 0.560 srgb} bind def
+/col22 {0.690 0.000 0.690 srgb} bind def
+/col23 {0.820 0.000 0.820 srgb} bind def
+/col24 {0.500 0.190 0.000 srgb} bind def
+/col25 {0.630 0.250 0.000 srgb} bind def
+/col26 {0.750 0.380 0.000 srgb} bind def
+/col27 {1.000 0.500 0.500 srgb} bind def
+/col28 {1.000 0.630 0.630 srgb} bind def
+/col29 {1.000 0.750 0.750 srgb} bind def
+/col30 {1.000 0.880 0.880 srgb} bind def
+/col31 {1.000 0.840 0.000 srgb} bind def
+
+end
+save
+newpath 0 100 moveto 0 0 lineto 128 0 lineto 128 100 lineto closepath clip newpath
+-19.0 117.0 translate
+1 -1 scale
+
+/cp {closepath} bind def
+/ef {eofill} bind def
+/gr {grestore} bind def
+/gs {gsave} bind def
+/sa {save} bind def
+/rs {restore} bind def
+/l {lineto} bind def
+/m {moveto} bind def
+/rm {rmoveto} bind def
+/n {newpath} bind def
+/s {stroke} bind def
+/sh {show} bind def
+/slc {setlinecap} bind def
+/slj {setlinejoin} bind def
+/slw {setlinewidth} bind def
+/srgb {setrgbcolor} bind def
+/rot {rotate} bind def
+/sc {scale} bind def
+/sd {setdash} bind def
+/ff {findfont} bind def
+/sf {setfont} bind def
+/scf {scalefont} bind def
+/sw {stringwidth} bind def
+/tr {translate} bind def
+/tnt {dup dup currentrgbcolor
+  4 -2 roll dup 1 exch sub 3 -1 roll mul add
+  4 -2 roll dup 1 exch sub 3 -1 roll mul add
+  4 -2 roll dup 1 exch sub 3 -1 roll mul add srgb}
+  bind def
+/shd {dup dup currentrgbcolor 4 -2 roll mul 4 -2 roll mul
+  4 -2 roll mul srgb} bind def
+/$F2psBegin {$F2psDict begin /$F2psEnteredState save def} def
+/$F2psEnd {$F2psEnteredState restore end} def
+
+$F2psBegin
+%%Page: 1 1
+10 setmiterlimit
+ 0.06299 0.06299 sc
+%
+% Fig objects follow
+%
+% Polyline
+7.500 slw
+n 450 450 m 2250 450 l 2250 1800 l 450 1800 l
+ cp gs col0 s gr 
+% Polyline
+ [60] 0 sd
+n 810 450 m
+ 810 1800 l gs col0 s gr  [] 0 sd
+% Polyline
+ [60] 0 sd
+n 1170 450 m
+ 1170 1800 l gs col0 s gr  [] 0 sd
+% Polyline
+ [60] 0 sd
+n 1530 450 m
+ 1530 1800 l gs col0 s gr  [] 0 sd
+% Polyline
+ [60] 0 sd
+n 1890 450 m
+ 1890 1800 l gs col0 s gr  [] 0 sd
+% Polyline
+ [60] 0 sd
+n 450 720 m
+ 2250 720 l gs col0 s gr  [] 0 sd
+% Polyline
+ [60] 0 sd
+n 450 990 m
+ 2250 990 l gs col0 s gr  [] 0 sd
+% Polyline
+ [60] 0 sd
+n 450 1260 m
+ 2250 1260 l gs col0 s gr  [] 0 sd
+% Polyline
+ [60] 0 sd
+n 450 1530 m
+ 2250 1530 l gs col0 s gr  [] 0 sd
+% Polyline
+n 1170 720 m 1890 720 l 1890 1260 l 1170 1260 l
+ cp gs col7 1.00 shd ef gr gs col0 s gr 
+/Courier-Bold ff 120.00 scf sf
+315 1575 m
+gs 1 -1 sc (4) col0 sh gr
+/Courier-Bold ff 120.00 scf sf
+315 1845 m
+gs 1 -1 sc (5) col0 sh gr
+/Courier-Bold ff 120.00 scf sf
+450 360 m
+gs 1 -1 sc (0) col0 sh gr
+/Courier-Bold ff 120.00 scf sf
+810 360 m
+gs 1 -1 sc (1) col0 sh gr
+/Courier-Bold ff 120.00 scf sf
+1170 360 m
+gs 1 -1 sc (2) col0 sh gr
+/Courier-Bold ff 120.00 scf sf
+1530 360 m
+gs 1 -1 sc (3) col0 sh gr
+/Courier-Bold ff 120.00 scf sf
+1890 360 m
+gs 1 -1 sc (4) col0 sh gr
+/Courier-Bold ff 120.00 scf sf
+2250 360 m
+gs 1 -1 sc (5) col0 sh gr
+/Courier-Bold ff 120.00 scf sf
+315 765 m
+gs 1 -1 sc (1) col0 sh gr
+/Courier-Bold ff 120.00 scf sf
+315 1035 m
+gs 1 -1 sc (2) col0 sh gr
+/Courier-Bold ff 120.00 scf sf
+315 1305 m
+gs 1 -1 sc (3) col0 sh gr
+/Courier-Bold ff 120.00 scf sf
+315 495 m
+gs 1 -1 sc (0) col0 sh gr
+$F2psEnd
+rs

docs/table.fig

@@ -0,0 +1,41 @@
+#FIG 3.2
+Portrait
+Center
+Metric
+A4      
+100.00
+Single
+-2
+1200 2
+2 2 0 1 0 7 100 0 -1 0.000 0 0 -1 0 0 5
+	 450 450 2250 450 2250 1800 450 1800 450 450
+2 1 1 1 0 7 100 0 -1 4.000 0 0 -1 0 0 2
+	 810 450 810 1800
+2 1 1 1 0 7 100 0 -1 4.000 0 0 -1 0 0 2
+	 1170 450 1170 1800
+2 1 1 1 0 7 100 0 -1 4.000 0 0 -1 0 0 2
+	 1530 450 1530 1800
+2 1 1 1 0 7 100 0 -1 4.000 0 0 -1 0 0 2
+	 1890 450 1890 1800
+2 1 1 1 0 7 100 0 -1 4.000 0 0 -1 0 0 2
+	 450 720 2250 720
+2 1 1 1 0 7 100 0 -1 4.000 0 0 -1 0 0 2
+	 450 990 2250 990
+2 1 1 1 0 7 100 0 -1 4.000 0 0 -1 0 0 2
+	 450 1260 2250 1260
+2 1 1 1 0 7 100 0 -1 4.000 0 0 -1 0 0 2
+	 450 1530 2250 1530
+2 2 0 1 0 7 100 0 20 4.000 0 0 -1 0 0 5
+	 1170 720 1890 720 1890 1260 1170 1260 1170 720
+4 0 0 100 0 14 8 0.0000 4 90 75 315 1575 4\001
+4 0 0 100 0 14 8 0.0000 4 90 75 315 1845 5\001
+4 0 0 100 0 14 8 0.0000 4 90 75 450 360 0\001
+4 0 0 100 0 14 8 0.0000 4 90 75 810 360 1\001
+4 0 0 100 0 14 8 0.0000 4 90 75 1170 360 2\001
+4 0 0 100 0 14 8 0.0000 4 90 75 1530 360 3\001
+4 0 0 100 0 14 8 0.0000 4 90 75 1890 360 4\001
+4 0 0 100 0 14 8 0.0000 4 90 75 2250 360 5\001
+4 0 0 100 0 14 8 0.0000 4 90 75 315 765 1\001
+4 0 0 100 0 14 8 0.0000 4 90 75 315 1035 2\001
+4 0 0 100 0 14 8 0.0000 4 90 75 315 1305 3\001
+4 0 0 100 0 14 8 0.0000 4 90 75 315 495 0\001

docs/units.tex

@@ -22,8 +22,8 @@
 % Preamble.
 % Uncomment the one you need here. The book version is for the published
 % book version.
-\documentclass{report}
-%\documentclass{book}
+%\documentclass{report}
+\documentclass{book}
 %
 % Preamble
 %
@@ -31,13 +31,14 @@
 \ifx\pdfoutput\undefined
   \usepackage{html}
   \usepackage{htmllist}
-  \latex{\usepackage{fpc}}
+%  \latex{\usepackage{fpc}}
+  \latex{\usepackage{fpcbook}}
   \html{\input{fpc-html.tex}}
 \else
 % Uncomment the fpc or fpcbook version, depending on the output format
 % you want.
-  \usepackage{fpc}
-  %\usepackage{fpcbook}
+%  \usepackage{fpc}
+  \usepackage{fpcbook}
 \fi
 \latex{%
   \ifpdf

docs/user.tex

@@ -30,11 +30,12 @@
 \ifx\pdfoutput\undefined
   \usepackage{html}
   \usepackage{htmllist}
-  \latex{\usepackage{fpc}}
+%  \latex{\usepackage{fpc}}
+  \latex{\usepackage{fpcbook}}
   \html{\input{fpc-html.tex}}
 \else
-  \usepackage{fpc}
-%  \usepackage{fpcbook}
+%  \usepackage{fpc}
+  \usepackage{fpcbook}
 \fi
 \latex{%
   \usepackage{times}