put tables inside blocks

SCCS-vsn: old/lisp/PSD.doc/ch1.n 6.3
SCCS-vsn: old/lisp/PSD.doc/ch2.n 6.2
SCCS-vsn: old/lisp/PSD.doc/ch3.n 6.2
SCCS-vsn: old/lisp/PSD.doc/ch4.n 6.2

diff --git a/usr/src/old/lisp/PSD.doc/ch1.n b/usr/src/old/lisp/PSD.doc/ch1.n
index 7e2d053..5c3f007 100644 (file)
--- a/usr/src/old/lisp/PSD.doc/ch1.n
+++ b/usr/src/old/lisp/PSD.doc/ch1.n
@@ -2,7 +2,7 @@
 .\" All rights reserved.  The Berkeley software License Agreement
 .\" specifies the terms and conditions for redistribution.
 .\"
 .\" All rights reserved.  The Berkeley software License Agreement
 .\" specifies the terms and conditions for redistribution.
 .\"

-.\"    @(#)ch1.n       6.2 (Berkeley) %G%
+.\"    @(#)ch1.n       6.3 (Berkeley) %G%

 .\"
 .\" $Header: ch1.n,v 1.3 83/07/27 15:11:17 layer Exp $
 .Lc \s+2F\s-2RANZ\s0\ L\s-2ISP\s0\s-2 1
 .\"
 .\" $Header: ch1.n,v 1.3 83/07/27 15:11:17 layer Exp $
 .Lc \s+2F\s-2RANZ\s0\ L\s-2ISP\s0\s-2 1


@@ -154,7 +154,7 @@ creates uninterned symbols while
 creates 
 .i interned 
 ones.
 creates 
 .i interned 
 ones.

-.sp 1v
+.(b

 .TS
 box center ; 
 c | c | c |  c .
 .TS
 box center ; 
 c | c | c |  c .


@@ -175,11 +175,12 @@ print name        get_pname               string
 _
 hash link
 .TE
 _
 hash link
 .TE

+.)b

 .sh 3 list
 A list cell has two parts, called the car and cdr.
 List cells are created by the function 
 .i cons .
 .sh 3 list
 A list cell has two parts, called the car and cdr.
 List cells are created by the function 
 .i cons .

-.sp 1v
+.(b

 .TS
 box center ;
 c | c | c | c .
 .TS
 box center ;
 c | c | c | c .


@@ -190,6 +191,7 @@ car car     rplaca  lispval
 _
 cdr    cdr     rplacd  lispval
 .TE
 _
 cdr    cdr     rplacd  lispval
 .TE

+.)b

 .sh 3 binary
 This type acts as a function header for machine coded functions.
 It has two parts, a pointer to the start of the function and a
 .sh 3 binary
 This type acts as a function header for machine coded functions.
 It has two parts, a pointer to the start of the function and a


@@ -226,7 +228,7 @@ Objects of type binary are created by
 .i cfasl,
 and
 .i getaddress.
 .i cfasl,
 and
 .i getaddress.

-.sp 1v
+.(b

 .TS
 box center ;
 c | c | c | c .
 .TS
 box center ;
 c | c | c | c .


@@ -237,6 +239,7 @@ entry       getentry                string or fixnum
 _
 discipline     getdisc putdisc symbol or fixnum
 .TE
 _
 discipline     getdisc putdisc symbol or fixnum
 .TE

+.)b

 .sh 3 fixnum
 A fixnum is an integer constant in the range \(mi2\*[31\*] to
 2\*[31\*]\(mi1.
 .sh 3 fixnum
 A fixnum is an integer constant in the range \(mi2\*[31\*] to
 2\*[31\*]\(mi1.


@@ -323,7 +326,7 @@ The functions
 \fInew-vector\fP, and
 \fIvector\fP, can
 be used to create vectors.
 \fInew-vector\fP, and
 \fIvector\fP, can
 be used to create vectors.

-.sp 1v
+.(b

 .TS
 box center ;
 c | c | c | c .
 .TS
 box center ;
 c | c | c | c .


@@ -337,6 +340,7 @@ property    vprop   vsetprop        lispval
 _
 size   vsize   \-      fixnum
 .TE
 _
 size   vsize   \-      fixnum
 .TE

+.)b

 .sh 3 array
 Arrays are rather complicated types and are fully described in
 Chapter 9.
 .sh 3 array
 Arrays are rather complicated types and are fully described in
 Chapter 9.


@@ -349,7 +353,7 @@ table).
 .br
 Arrays are created by the function
 .i marray .
 .br
 Arrays are created by the function
 .i marray .

-.sp 1v
+.(b

 .TS
 box center ;
 c | c | c | c .
 .TS
 box center ;
 c | c | c | c .


@@ -368,6 +372,7 @@ length      getlength       putlength       fixnum
 _
 delta  getdelta        putdelta        fixnum
 .TE
 _
 delta  getdelta        putdelta        fixnum
 .TE

+.)b

 .sh 3 value
 A value cell contains a pointer to a lispval.
 This type is used mainly by arrays of general lisp objects.
 .sh 3 value
 A value cell contains a pointer to a lispval.
 This type is used mainly by arrays of general lisp objects.


@@ -445,7 +450,7 @@ The arguments all have names which begin with a letter  or letters and
 an underscore.
 The letter(s) gives the allowable type(s) for that argument according to
 this table.
 an underscore.
 The letter(s) gives the allowable type(s) for that argument according to
 this table.

-.sp 1v
+.(b

 .TS
 box center ;
 c  | c 
 .TS
 box center ;
 c  | c 


@@ -487,7 +492,7 @@ p   port (or nil)
 _
 h      hunk
 .TE
 _
 h      hunk
 .TE

-
+.)b

 In the first line of a function description,
 those arguments preceded by a quote mark are evaluated (usually 
 before the function is called).
 In the first line of a function description,
 those arguments preceded by a quote mark are evaluated (usually 
 before the function is called).

diff --git a/usr/src/old/lisp/PSD.doc/ch2.n b/usr/src/old/lisp/PSD.doc/ch2.n
index 27b961d..acb178a 100644 (file)
--- a/usr/src/old/lisp/PSD.doc/ch2.n
+++ b/usr/src/old/lisp/PSD.doc/ch2.n
@@ -2,7 +2,7 @@
 .\" All rights reserved.  The Berkeley software License Agreement
 .\" specifies the terms and conditions for redistribution.
 .\"
 .\" All rights reserved.  The Berkeley software License Agreement
 .\" specifies the terms and conditions for redistribution.
 .\"

-.\"    @(#)ch2.n       6.1 (Berkeley) %G%
+.\"    @(#)ch2.n       6.2 (Berkeley) %G%

 .\"
 .\" $Header: ch2.n,v 1.7 83/07/30 14:42:38 layer Exp $
 .Lc Data\ Structure\ Access 2
 .\"
 .\" $Header: ch2.n,v 1.7 83/07/30 14:42:38 layer Exp $
 .Lc Data\ Structure\ Access 2


@@ -487,6 +487,7 @@ important reason that
 .i signp
 is used.
 The permitted values for s_test and what they mean are given in this table.
 .i signp
 is used.
 The permitted values for s_test and what they mean are given in this table.

+.(b

 .TS
 center box;
 l l .
 .TS
 center box;
 l l .


@@ -500,6 +501,7 @@ n   g_val \(!= 0
 ge     g_val \(>= 0
 g      g_val > 0
 .TE
 ge     g_val \(>= 0
 g      g_val > 0
 .TE

+.)b

 .Lf eq "'g_arg1 'g_arg2"
 .Re
 t if g_arg1 and g_arg2 are the exact same lisp object.
 .Lf eq "'g_arg1 'g_arg2"
 .Re
 t if g_arg1 and g_arg2 are the exact same lisp object.

diff --git a/usr/src/old/lisp/PSD.doc/ch3.n b/usr/src/old/lisp/PSD.doc/ch3.n
index a3daf2b..bb5dc5b 100644 (file)
--- a/usr/src/old/lisp/PSD.doc/ch3.n
+++ b/usr/src/old/lisp/PSD.doc/ch3.n
@@ -2,7 +2,7 @@
 .\" All rights reserved.  The Berkeley software License Agreement
 .\" specifies the terms and conditions for redistribution.
 .\"
 .\" All rights reserved.  The Berkeley software License Agreement
 .\" specifies the terms and conditions for redistribution.
 .\"

-.\"    @(#)ch3.n       6.1 (Berkeley) %G%
+.\"    @(#)ch3.n       6.2 (Berkeley) %G%

 .\"
 ." $Header: ch3.n,v 1.3 83/06/21 13:00:48 sklower Exp $
 .Lc Arithmetic\ Functions 3
 .\"
 ." $Header: ch3.n,v 1.3 83/06/21 13:00:48 sklower Exp $
 .Lc Arithmetic\ Functions 3


@@ -248,6 +248,7 @@ In the following table, \(** represents bitwise and, \(pl represents
 bitwise or, \o'\(ci\(pl' represents bitwise xor and \(no represents
 bitwise negation and is the highest precedence operator.
 .ps 8
 bitwise or, \o'\(ci\(pl' represents bitwise xor and \(no represents
 bitwise negation and is the highest precedence operator.
 .ps 8

+.(b

 .TS
 center box ;
 c s s s s s s s s
 .TS
 center box ;
 c s s s s s s s s


@@ -268,6 +269,7 @@ result      \(no (x \(pl y) \(no(x \o'\(ci\(pl' y)  \(no x  \(no x \(pl y   \(no y  x \(pl
 common
 names  nor     equiv           implies                 nand
 .TE
 common
 names  nor     equiv           implies                 nand
 .TE

+.)b

 .ps 10
 .pp
 .Lf lsh "'x_val 'x_amt"
 .ps 10
 .pp
 .Lf lsh "'x_val 'x_amt"

diff --git a/usr/src/old/lisp/PSD.doc/ch4.n b/usr/src/old/lisp/PSD.doc/ch4.n
index 06dde6e..a0988d5 100644 (file)
--- a/usr/src/old/lisp/PSD.doc/ch4.n
+++ b/usr/src/old/lisp/PSD.doc/ch4.n
@@ -2,7 +2,7 @@
 .\" All rights reserved.  The Berkeley software License Agreement
 .\" specifies the terms and conditions for redistribution.
 .\"
 .\" All rights reserved.  The Berkeley software License Agreement
 .\" specifies the terms and conditions for redistribution.
 .\"

-.\"    @(#)ch4.n       6.1 (Berkeley) %G%
+.\"    @(#)ch4.n       6.2 (Berkeley) %G%

 .\"
 ." $Header: ch4.n,v 1.4 83/07/27 15:11:44 layer Exp $
 .pp
 .\"
 ." $Header: ch4.n,v 1.4 83/07/27 15:11:44 layer Exp $
 .pp


@@ -896,7 +896,7 @@ All sublists should have the same length.
 .lp
 Readers may find the following summary table useful in remembering
 the differences between the six mapping functions:
 .lp
 Readers may find the following summary table useful in remembering
 the differences between the six mapping functions:

-
+.(b

 .TS
 box;
 c | c s s.
 .TS
 box;
 c | c s s.


@@ -917,7 +917,7 @@ elements of list    mapc    mapcar  mapcan
 
 sublists       map     maplist mapcon
 .TE
 
 sublists       map     maplist mapcon
 .TE

-.sp 2v
+.)b

 .Lf mfunction "t_entry 's_disc"
 .Re
 a lisp object of type binary composed of t_entry and s_disc.
 .Lf mfunction "t_entry 's_disc"
 .Re
 a lisp object of type binary composed of t_entry and s_disc.