--- xgcl-2/dwdoc.tex.orig	2010-01-22 17:49:06.000000000 -0700

+++ xgcl-2/dwdoc.tex	2010-12-29 11:36:19.808014216 -0700

@@ -1,19 +1,16 @@

 % dwdoc.tex          Gordon S. Novak Jr.

 % 08 Oct 92; 08 Oct 93; 16 Nov 94; 05 Jan 95; 25 Jan 06; 26 Jan 06; 08 Dec 08

-\documentstyle[12pt]{article}

-\setlength{\oddsidemargin}{0 in}

-\setlength{\textwidth}{6.5 in}

-\setlength{\textheight}{9.0 in}

+\documentclass[12pt]{article}

+\usepackage[margin=1in]{geometry}

 \setlength{\parskip}{0.1 in}

 \setlength{\parindent}{0.0 in}

-\setlength{\topmargin}{-0.4in}

 \hyphenpenalty=9990

 \begin{document}

 \Large

-\begin{center} {\bf Interface from GCL to X Windows} \\  \end{center}

+\begin{center} \textbf{Interface from GCL to X Windows} \\  \end{center}

 \normalsize

@@ -42,508 +39,512 @@ consists of several parts:

 \item Hiep Huu Nguyen has written (and adapted from X Consortium software)

 an interface between GCL and Xlib, the X library in C.

 Xlib functions can be called directly if desired, but most users will find

-the {\tt dwindow} functions easier to use.  There is little documentation

+the \texttt{dwindow} functions easier to use.  There is little documentation

 of these functions, but the Xlib documentation can be consulted, and

-the {\tt dwindow} functions can be examined as examples.

+the \texttt{dwindow} functions can be examined as examples.

-\item The {\tt dwindow} functions described in this document, which call

+\item The \texttt{dwindow} functions described in this document, which call

 the Xlib functions and provide an easier interface for Lisp programs.

 \item It is possible to make an interactive graphical interface

 within a web page; this is described in a section below.

 \end{enumerate}

 The source file for the interface (written in GLISP) is

-{\tt dwindow.lsp}; this file is compiled into a file in plain Lisp,

-{\tt dwtrans.lsp}.  {\tt dwtrans.lsp} is compiled as part of XGCL.

+\texttt{dwindow.lsp}; this file is compiled into a file in plain Lisp,

+\texttt{dwtrans.lsp}.  \texttt{dwtrans.lsp} is compiled as part of XGCL.

 The functions in this package use the convention that the coordinate

-{\tt (0 0)} is the lower-left corner of a window, with positive {\tt y}

+\texttt{(0 0)} is the lower-left corner of a window, with positive \texttt{y}

 being upward.  This is different from the convention used by

-X, which assumes that {\tt (0 0)} is the upper left corner and

-that positive {\tt y} is downward.

+X, which assumes that \texttt{(0 0)} is the upper left corner and

+that positive \texttt{y} is downward.

 In the descriptions below, some function arguments are shown with a type,

-e.g. {\tt arg:type}, to indicate the expected type of the argument.

-The type {\tt vector} is a list {\tt (x y)} of integers.  The argument

-{\tt w} that is used with many functions is of type {\tt window}

-({\tt window} is a Lisp data structure used by the {\tt dwindow} functions).

+e.g. \texttt{arg:type}, to indicate the expected type of the argument.

+The type \texttt{vector} is a list \texttt{(x y)} of integers.  The argument

+\texttt{w} that is used with many functions is of type \texttt{window}

+(\texttt{window} is a Lisp data structure used by the \texttt{dwindow}

+functions).

-Both the Xlib and {\tt dwindow} functions are in the package {\tt xlib:}.

-In order to use these functions, the Lisp command {\tt (use-package 'xlib)}

-should be used to import the {\tt dwindow} symbols.

+Both the Xlib and \texttt{dwindow} functions are in the package \texttt{xlib:}.

+In order to use these functions, the Lisp command \texttt{(use-package 'xlib)}

+should be used to import the \texttt{dwindow} symbols.

 \section{Examples and Utilities}

-\subsection{{\tt dwtest}}

+\subsection{\texttt{dwtest}}

-The file {\tt dwtest.lsp} contains example functions that illustrate

-the use of the {\tt dwindow} package.  The function call {\tt (wtesta)}

-creates a small window for testing.  {\tt (wtestb)} through

-{\tt (wtestk)} perform drawing and mouse interaction tests using the

+The file \texttt{dwtest.lsp} contains example functions that illustrate

+the use of the \texttt{dwindow} package.  The function call \texttt{(wtesta)}

+creates a small window for testing.  \texttt{(wtestb)} through

+\texttt{(wtestk)} perform drawing and mouse interaction tests using the

 window.  These functions may be consulted as examples of the use of

-commonly used {\tt dwindow} functions.

+commonly used \texttt{dwindow} functions.

-\subsection{{\tt pcalc}}

+\subsection{\texttt{pcalc}}

-The file {\tt pcalc.lsp} implements

-a pocket calculator as a {\tt picmenu}; its entry is {\tt (pcalc)}.

+The file \texttt{pcalc.lsp} implements

+a pocket calculator as a \texttt{picmenu}; its entry is \texttt{(pcalc)}.

-\subsection{{\tt draw}}

+\subsection{\texttt{draw}}

-The file {\tt drawtrans.lsp} contains an interactive drawing program;

-its entry is {\tt (draw 'foo)} where {\tt foo} is the name of the drawing.

-The file {\tt ice-cream.lsp} can be loaded, followed by

-{\tt (draw 'ice-cream)} to examine an example drawing.

-{\tt draw} can produce a Lisp program or a set of \LaTeX \  commands to

-recreate the drawing; use {\tt origin to zero} before making a program.

-{\tt (draw-out file names)} will write definitions of drawings in the

-list {\tt names} to the file {\tt file}.

+The file \texttt{drawtrans.lsp} contains an interactive drawing program; its

+entry is \texttt{(draw 'foo)} where \texttt{foo} is the name of the drawing.

+The file \texttt{ice-cream.lsp} can be loaded, followed by

+\texttt{(draw 'ice-cream)} to examine an example drawing.

+\texttt{draw} can produce a Lisp program or a set of \LaTeX \  commands to

+recreate the drawing; use \texttt{origin to zero} before making a program.

+\texttt{(draw-out file names)} will write definitions of drawings in the

+list \texttt{names} to the file \texttt{file}.

-\subsection{{\tt editors}}

+\subsection{\texttt{editors}}

-The file {\tt editorstrans.lsp} contains some interactive editing programs;

-it is a translation of the file {\tt editors.lsp} .

-One useful editor is the color editor; after entering {\tt (wtesta)}

-(in file {\tt dwtest.lsp}), enter {\tt (edit-color myw)} to edit a

-color.  The result is an {\tt rgb} list as used in {\tt window-set-color}.

+The file \texttt{editorstrans.lsp} contains some interactive editing programs;

+it is a translation of the file \texttt{editors.lsp}.

+One useful editor is the color editor; after entering \texttt{(wtesta)}

+(in file \texttt{dwtest.lsp}), enter \texttt{(edit-color myw)} to edit a

+color.  The result is an \texttt{rgb} list as used in

+\texttt{window-set-color}.

 A simple line editor and an Emacs-like text editor are described in sections

 \ref{texted}  and \ref{emacsed} below.

 \section{Menus}

-The function {\tt menu} provides an easy interface to make a pop-up menu,

+The function \texttt{menu} provides an easy interface to make a pop-up menu,

 get a selection from it, and destroy it: \\

 \vspace{-0.2in}

-{\tt \hspace*{0.5in} (menu items \&optional title)} \\

+\texttt{\hspace*{0.5in} (menu items \&optional title)} \\

 \vspace{-0.1in}

-Example: {\tt (menu '(red white blue))}

+Example: \texttt{(menu '(red white blue))}

 This simple call is all that is needed in most cases.

 More sophisticated menu features are described below.

-The {\tt items} in a menu is a list; each item may be a symbol, a {\tt cons}

-of a symbol or string and the corresponding value, or a {\tt cons} of a

-function name and the corresponding value.  In the latter case, the function

-is expected to draw the corresponding menu item.

+The \texttt{items} in a menu is a list; each item may be a symbol, a

+\texttt{cons} of a symbol or string and the corresponding value, or a

+\texttt{cons} of a function name and the corresponding value.  In the latter

+case, the function is expected to draw the corresponding menu item.

 If a function name is specified as the first element of a menu item, the

-drawing function should have arguments {\tt (fn w x y)}, where {\tt w}

-is the window and {\tt x} and {\tt y} are the lower-left corner of the

+drawing function should have arguments \texttt{(fn w x y)}, where \texttt{w}

+is the window and \texttt{x} and \texttt{y} are the lower-left corner of the

 drawing area.  The property list of the function name should have the

-property {\tt display-size}, which should be a list {\tt (width height)}

+property \texttt{display-size}, which should be a list \texttt{(width height)}

 in pixels of the displayed symbol.

 Menus can be associated with a particular window; if no window is specified,

 the menu is associated with the window where the mouse cursor is located

 when the menu is initialized (which might not be a Lisp user's window).  If a

-menu is associated with a user window, it may be {\em permanent} (left

-displayed after a selection is made) and may be {\em flat} (drawn directly

+menu is associated with a user window, it may be \emph{permanent} (left

+displayed after a selection is made) and may be \emph{flat} (drawn directly

 on the containing window, rather than having its own window).

-A menu can be created by {\tt menu-create} : \\

+A menu can be created by \texttt{menu-create} : \\

 \vspace{-0.1in}

-{\tt \hspace*{0.5in}

+\texttt{\hspace*{0.5in}

  (menu-create items \&optional title w:window x y perm flat font)} \\

 \vspace{-0.1in}

-{\tt title}, if specified, is displayed over the menu.

-{\tt w} is an existing {\tt window}; if specified, the menu is put

-within this window at the {\tt x y} offsets specified (adjusted if necessary

-to keep the menu inside the window).  If no {\tt w}

-is specified, or if {\tt x} is {\tt nil}, the menu is put where the cursor

+\texttt{title}, if specified, is displayed over the menu.

+\texttt{w} is an existing \texttt{window}; if specified, the menu is put

+within this window at the \texttt{x y} offsets specified (adjusted if necessary

+to keep the menu inside the window).  If no \texttt{w} is

+specified, or if \texttt{x} is \texttt{nil}, the menu is put where the cursor

 is the first time the menu is displayed.

-{\tt perm} is non-{\tt nil} if the menu is to be permanent, {\em i.e.}, is to

-be left displayed after a selection has been made.

-{\tt flat} is non-{\tt nil} if the menu is to be drawn directly on the

+\texttt{perm} is non-\texttt{nil} if the menu is to be permanent, \emph{i.e.},

+is to be left displayed after a selection has been made.

+\texttt{flat} is non-\texttt{nil} if the menu is to be drawn directly on the

 containing window.

-{\tt font} is a symbol or string that names the font to be used; the

-default is a {\tt 9x15} typewriter font.

+\texttt{font} is a symbol or string that names the font to be used; the

+default is a \texttt{9x15} typewriter font.

-The menu is returned as the value of {\tt menu-create}.  Such a menu can

-be saved; selections can be made from a menu {\tt m} as follows: \\

+The menu is returned as the value of \texttt{menu-create}.  Such a menu can

+be saved; selections can be made from a menu \texttt{m} as follows: \\

 \vspace{-0.1in}

-{\tt \hspace*{0.5in} (menu-select m \&optional inside)} \ \ \ \ \ or

-{\tt \hspace*{0.5in} (menu-select! m)} \\

+\texttt{\hspace*{0.5in} (menu-select m \&optional inside)} \ \ \ \ \ or

+\texttt{\hspace*{0.5in} (menu-select! m)} \\

 \vspace{-0.1in}

-{\tt menu-select} will return {\tt nil} if the mouse is clicked outside the

-menu, or is moved outside after it has been inside (or if {\tt inside} is

-not {\tt nil}), provided that the menu is contained within a user-created

+\texttt{menu-select} will return \texttt{nil} if the mouse is clicked outside

+the menu, or is moved outside after it has been inside (or if \texttt{inside}

+is not \texttt{nil}), provided that the menu is contained within a user-created

 window.

-{\tt menu-select!} requires that a choice be made.

+\texttt{menu-select!} requires that a choice be made.

 In order to avoid wasting storage, unused menus should be destroyed:

-{\tt (menu-destroy m)}.  The simple {\tt menu} function destroys its

+\texttt{(menu-destroy m)}.  The simple \texttt{menu} function destroys its

 menu after it is used.

-{\tt \hspace*{0.5in} (menu-size m)} \\

-{\tt \hspace*{0.5in} (menu-moveto-xy m x y)} \\

-{\tt \hspace*{0.5in} (menu-reposition m)} \

+\texttt{\hspace*{0.5in} (menu-size m)} \\

+\texttt{\hspace*{0.5in} (menu-moveto-xy m x y)} \\

+\texttt{\hspace*{0.5in} (menu-reposition m)} \

-{\tt menu-reposition} will reposition a {\tt flat} menu within its parent

+\texttt{menu-reposition} will reposition a \texttt{flat} menu within its parent

 window by allowing the user to position a ghost box using the mouse.

-{\tt menu-size} returns the size of the menu as a vector, {\tt (x y)}.

-{\tt menu-moveto-xy} adjusts the offsets to move a {\tt flat} menu to

+\texttt{menu-size} returns the size of the menu as a vector, \texttt{(x y)}.

+\texttt{menu-moveto-xy} adjusts the offsets to move a \texttt{flat} menu to

 the specified position within its parent window.  These functions and

-{\tt menu-destroy} work for picmenus and barmenus as well.

+\texttt{menu-destroy} work for picmenus and barmenus as well.

-{\tt \hspace*{0.5in} (menu-item-position m name \&optional location)} \\

+\texttt{\hspace*{0.5in} (menu-item-position m name \&optional location)} \\

 \vspace{-0.1in}

-{\tt menu-item-position} returns a vector {\tt (x y)} that gives the

-coordinates of the menu item whose name is {\tt name}.  {\tt location}

-may be {\tt center}, {\tt left}, {\tt right}, {\tt top}, or {\tt bottom};

-the default is the lower-left corner of the menu item.  {\tt center}

-specifies the center of the box containing the menu item; the other

-{\tt location} values are at the center of the specified edge of the box.

+\texttt{menu-item-position} returns a vector \texttt{(x y)} that gives the

+coordinates of the menu item whose name is \texttt{name}.  \texttt{location}

+may be \texttt{center}, \texttt{left}, \texttt{right}, \texttt{top}, or

+\texttt{bottom}; the default is the lower-left corner of the menu item.

+\texttt{center} specifies the center of the box containing the menu item; the

+other \texttt{location} values are at the center of the specified edge of the

+box.

 \subsection{Picmenus}

-A {\tt picmenu} (picture menu) is analogous to a menu, but involves a

+A \texttt{picmenu} (picture menu) is analogous to a menu, but involves a

 user-defined picture containing sensitive spots or ``buttons''.

-The test function {\tt (wteste)} shows an example of a {\tt picmenu}.

-A {\tt picmenu} is created by: \\

+The test function \texttt{(wteste)} shows an example of a \texttt{picmenu}.

+A \texttt{picmenu} is created by: \\

 \vspace{-0.1in}

-{\tt \hspace*{0.5in} (picmenu-create buttons width height drawfn \\

+\texttt{\hspace*{0.5in} (picmenu-create buttons width height drawfn \\

 \hspace*{1.5in} \&optional title dotflg w:window x y perm flat font boxflg)} \\

 \vspace{-0.1in}

 If a picmenu is to be used more than once, the common parts can be made

-into a {\tt picmenu-spec} and reused:

+into a \texttt{picmenu-spec} and reused:

 \vspace{-0.1in}

-{\tt \hspace*{0.5in} (picmenu-create-spec buttons width height drawfn \\

+\texttt{\hspace*{0.5in} (picmenu-create-spec buttons width height drawfn \\

 \hspace*{1.5in} \&optional dotflg font)} \\

 \vspace{-0.1in}

-{\tt \hspace*{0.5in} (picmenu-create-from-spec spec:picmenu-spec \\

+\texttt{\hspace*{0.5in} (picmenu-create-from-spec spec:picmenu-spec \\

 \hspace*{1.5in} \&optional title w:window x y perm flat boxflg)} \\

 \vspace{-0.1in}

-{\tt width} and {\tt height} are the size of the area occupied by the

-picture.  {\tt (drawfn w x y)} should draw the picture at the offset

-{\tt x y}.  Note that the {\tt draw} utility can be used to

-make the drawing function, including {\tt picmenu} buttons.

-{\tt dotflg} is non-{\tt nil} if it is desired that small boxes be

+\texttt{width} and \texttt{height} are the size of the area occupied by the

+picture.  \texttt{(drawfn w x y)} should draw the picture at the offset

+\texttt{x y}.  Note that the \texttt{draw} utility can be used to

+make the drawing function, including \texttt{picmenu} buttons.

+\texttt{dotflg} is non-\texttt{nil} if it is desired that small boxes be

 automatically added to the sensitive points when the picture is drawn.

-{\tt boxflg} is non-{\tt nil} if a box is to be drawn around the picmenu

+\texttt{boxflg} is non-\texttt{nil} if a box is to be drawn around the picmenu

 when the picture is drawn (this is only needed for flat

-picmenus).  If {\tt perm} is non-nil, the drawing program is not called when

+picmenus).  If \texttt{perm} is non-nil, the drawing program is not called when

 a selection is to be made, so that an external program must draw the

-{\tt picmenu}; this avoids the need to redraw a complex picture.

+\texttt{picmenu}; this avoids the need to redraw a complex picture.

 The remaining arguments are as described for menus.

-Each of the {\tt buttons} in a picmenu is a list: \\

+Each of the \texttt{buttons} in a picmenu is a list: \\

 \vspace{-0.1in}

-{\tt \hspace*{0.5in} (buttonname offset size highlightfn unhighlightfn)} \\

+\texttt{\hspace*{0.5in} (buttonname offset size highlightfn unhighlightfn)} \\

 \vspace{-0.1in}

-{\tt buttonname} is the name of the button; it is the value returned when that

-button is selected.

-{\tt offset} is a vector {\tt (x y)} that gives the offset of the center

+\texttt{buttonname} is the name of the button; it is the value returned when

+that button is selected.

+\texttt{offset} is a vector \texttt{(x y)} that gives the offset of the center

 of the button from the lower-left corner of the picture.

 The remainder of the button list may be omitted.

-{\tt size} is an optional list {\tt (width height)} that gives the size of the

-sensitive area of the button; the default size is {\tt (12\ 12)}.

-{\tt (highlightfn w x y)} and {\tt (unhighlightfn w x y)} (where {\tt (x y)}

-is the center of the button in the coordinates of {\tt w}) are optional

-functions to highlight the button area when the cursor is moved into it and

-unhighlight the button when the cursor is moved out; the default is to

-display a box of the specified {\tt size}.

+\texttt{size} is an optional list \texttt{(width height)} that gives the size

+of the sensitive area of the button; the default size is \texttt{(12\ 12)}.

+\texttt{(highlightfn w x y)} and \texttt{(unhighlightfn w x y)} (where

+\texttt{(x y)} is the center of the button in the coordinates of \texttt{w})

+are optional functions to highlight the button area when the cursor is moved

+into it and unhighlight the button when the cursor is moved out; the default

+is to display a box of the specified \texttt{size}.

-{\tt \hspace*{0.5in} (picmenu-select m \&optional inside)} \\

-If the {\tt picmenu} is not {\tt flat}, its window should be destroyed

-following the selection using {\tt menu-destroy}.

+\texttt{\hspace*{0.5in} (picmenu-select m \&optional inside)} \\

+If the \texttt{picmenu} is not \texttt{flat}, its window should be destroyed

+following the selection using \texttt{menu-destroy}.

-{\tt \hspace*{0.5in} (picmenu-item-position m name \&optional location)} \\

+\texttt{\hspace*{0.5in} (picmenu-item-position m name \&optional location)} \\

 \vspace{-0.1in}

-{\tt \hspace*{0.5in} (picmenu-delete-named-button m name:symbol)} \\

-This deletes a button from a displayed {\tt picmenu}.  The set of

-deleted buttons is reset to {\tt nil} when the picmenu is drawn.

+\texttt{\hspace*{0.5in} (picmenu-delete-named-button m name:symbol)} \\

+This deletes a button from a displayed \texttt{picmenu}.  The set of

+deleted buttons is reset to \texttt{nil} when the picmenu is drawn.

 \subsection{Barmenus}

-A {\tt barmenu} displays a bar graph whose size can be adjusted using

+A \texttt{barmenu} displays a bar graph whose size can be adjusted using

 the mouse.

-{\tt \hspace*{0.5in} 

+\texttt{\hspace*{0.5in} 

 (barmenu-create maxval initval barwidth \\

 \hspace*{1.5in} \&optional title horizontal subtrackfn subtrackparms \\

 \hspace*{1.5in} parentw x y perm flat color)}

-A value is selected by: {\tt (barmenu-select m:barmenu \&optional inside)} \\

-If the {\tt barmenu} is not {\tt flat}, its window should be destroyed

-following the selection using {\tt menu-destroy}.

+A value is selected by: \texttt{(barmenu-select m:barmenu \&optional inside)} \\

+If the \texttt{barmenu} is not \texttt{flat}, its window should be destroyed

+following the selection using \texttt{menu-destroy}.

 The user must first click the mouse in the bar area; then

 the size of the displayed bar is adjusted as the user moves the mouse

-pointer.  In addition, the {\tt subtrackfn} is called with arguments

-of the size of the bar followed by the {\tt subtrackparms}; this can

+pointer.  In addition, the \texttt{subtrackfn} is called with arguments

+of the size of the bar followed by the \texttt{subtrackparms}; this can

 be used, for example, to display a numeric value in addition to the

 bar size.

 \subsection{Menu Sets and Menu Conns}

-A {\tt menu-set} is a set of multiple menus, picmenus, or barmenus

+A \texttt{menu-set} is a set of multiple menus, picmenus, or barmenus

 that are simultaneously active within the same window.  Menu-sets

-can be used to implement graphical user interfaces.  A {\tt menu-conns}

+can be used to implement graphical user interfaces.  A \texttt{menu-conns}

 is a menu-set that includes connections between menus; this can be

 used to implement interfaces that allow the user to construct a network

 from components.

-The source file for menu-sets is the GLISP file {\tt menu-set.lsp};

-this file is translated as part of the file {\tt drawtrans.lsp} in

+The source file for menu-sets is the GLISP file \texttt{menu-set.lsp};

+this file is translated as part of the file \texttt{drawtrans.lsp} in

 plain Lisp.  Examples of the use of menu sets are given at the top

-of the file {\tt menu-set.lsp}.  In the following descriptions,

-{\tt ms} is a {\tt menu-set} and {\tt mc} is a {\tt menu-conns}.

+of the file \texttt{menu-set.lsp}.  In the following descriptions,

+\texttt{ms} is a \texttt{menu-set} and \texttt{mc} is a \texttt{menu-conns}.

-{\tt \hspace*{0.5in} (menu-set-create w)} creates a menu set to be displayed

-in the window {\tt w}.

+\texttt{\hspace*{0.5in} (menu-set-create w)} creates a menu set to be displayed

+in the window \texttt{w}.

-{\tt \hspace*{0.5in} (menu-set-name symbol)} makes a {\tt gensym} name that

-begins with {\tt symbol}.

+\texttt{\hspace*{0.5in} (menu-set-name symbol)} makes a \texttt{gensym} name

+that begins with \texttt{symbol}.

-{\tt \hspace*{0.5in} (menu-set-add-menu ms name:symbol sym title items} \\

-\hspace*{1.5in} {\tt \&optional offset:vector)}

+\texttt{\hspace*{0.5in} (menu-set-add-menu ms name:symbol sym title items} \\

+\hspace*{1.5in} \texttt{\&optional offset:vector)}

-This function adds a menu to a menu-set.  {\tt sym} is arbitrary

+This function adds a menu to a menu-set.  \texttt{sym} is arbitrary

 information that is saved with the menu.

-{\tt \hspace*{0.5in} (menu-set-add-picmenu ms name sym title spec:picmenu-spec} \\

-\hspace*{1.5in} {\tt \&optional offset:vector nobox)}

+\texttt{\hspace*{0.5in} (menu-set-add-picmenu ms name sym title spec:picmenu-spec} \\

+\hspace*{1.5in} \texttt{\&optional offset:vector nobox)}

-{\tt \hspace*{0.5in} (menu-set-add-component ms name \&optional offset:vector)}

+\texttt{\hspace*{0.5in} (menu-set-add-component ms name \&optional offset:vector)}

-This adds a component that has a {\tt picmenu-spec} defined on the

-property list of {\tt name}.

+This adds a component that has a \texttt{picmenu-spec} defined on the

+property list of \texttt{name}.

-{\tt \hspace*{0.5in} (menu-set-add-barmenu ms name sym barmenu title} \\

-\hspace*{1.5in} {\tt \&optional offset:vector)}

+\texttt{\hspace*{0.5in} (menu-set-add-barmenu ms name sym barmenu title} \\

+\hspace*{1.5in} \texttt{\&optional offset:vector)}

-{\tt \hspace*{0.5in} (menu-set-draw ms)} draws all the menus.

+\texttt{\hspace*{0.5in} (menu-set-draw ms)} draws all the menus.

-{\tt \hspace*{0.5in} (menu-set-select ms \&optional redraw enabled)}

+\texttt{\hspace*{0.5in} (menu-set-select ms \&optional redraw enabled)}

-{\tt menu-set-select} gets a selection from a menu-set.  If {\tt redraw}

-is non-{\tt nil}, the menu-set is drawn.  {\tt enabled} may be a list

+\texttt{menu-set-select} gets a selection from a menu-set.  If \texttt{redraw}

+is non-\texttt{nil}, the menu-set is drawn.  \texttt{enabled} may be a list

 of names of menus that are enabled for selection.  The result is

-{\tt (selection menu-name)}, or {\tt ((x y) BACKGROUND button)}

+\texttt{(selection menu-name)}, or \texttt{((x y) BACKGROUND button)}

 for a click outside any menu.

-{\tt \hspace*{0.5in} (menu-conns-create ms)} creates a {\tt menu-conns}

-from a {\tt menu-set}.

+\texttt{\hspace*{0.5in} (menu-conns-create ms)} creates a \texttt{menu-conns}

+from a \texttt{menu-set}.

-{\tt \hspace*{0.5in} (menu-conns-add-conn mc)}

+\texttt{\hspace*{0.5in} (menu-conns-add-conn mc)}

 This function allows the user to select two ports from menus of the

-{\tt menu-conns}.  It then draws a line between the ports and adds the

-connection to the {\tt connections} of the {\tt menu-conns}.

+\texttt{menu-conns}.  It then draws a line between the ports and adds the

+connection to the \texttt{connections} of the \texttt{menu-conns}.

-{\tt \hspace*{0.5in} (menu-conns-move mc)}

+\texttt{\hspace*{0.5in} (menu-conns-move mc)}

 This function allows the user to select a menu and move it.

-The {\tt menu-set} and connections are redrawn afterwards.

+The \texttt{menu-set} and connections are redrawn afterwards.

-{\tt \hspace*{0.5in} (menu-conns-find-conn mc pt:vector)} \\

-This finds the connection selected by the point {\tt pt}, if any.

+\texttt{\hspace*{0.5in} (menu-conns-find-conn mc pt:vector)} \\

+This finds the connection selected by the point \texttt{pt}, if any.

 This is useful to allow the user to delete a connection:

-{\tt \hspace*{0.5in} (menu-conns-delete-conn mc conn)}

+\texttt{\hspace*{0.5in} (menu-conns-delete-conn mc conn)}

-{\tt \hspace*{0.5in} (menu-conns-find-conns mc menuname port)} \\

-This returns all the connections from the specified {\tt port} (selection)

-of the menu whose name is {\tt menuname}.

+\texttt{\hspace*{0.5in} (menu-conns-find-conns mc menuname port)} \\

+This returns all the connections from the specified \texttt{port} (selection)

+of the menu whose name is \texttt{menuname}.

 \section{Windows}

-{\tt \hspace*{0.5in} (window-create width height \&optional title parentw

+\texttt{\hspace*{0.5in} (window-create width height \&optional title parentw

  x y font)} \\

 \vspace{-0.1in}

-{\tt window-create} makes a new window of the specified {\tt width} and

-{\tt height}.  {\tt title}, if specified, becomes the displayed title

-of the window.  If {\tt parentw} is specified, it should be the

-{\tt window-parent} property of an existing window, which becomes the parent

-window of the new window.  {\tt x} and {\tt y} are the offset of the

-new window from the parent window.  {\tt font} is the font to be used

+\texttt{window-create} makes a new window of the specified \texttt{width} and

+\texttt{height}.  \texttt{title}, if specified, becomes the displayed title

+of the window.  If \texttt{parentw} is specified, it should be the

+\texttt{window-parent} property of an existing window, which becomes the parent

+window of the new window.  \texttt{x} and \texttt{y} are the offset of the

+new window from the parent window.  \texttt{font} is the font to be used

 for printing in the window; the default is given by

-{\tt *window-default-font-name*}, initially {\tt courier-bold-12}.

+\texttt{*window-default-font-name*}, initially \texttt{courier-bold-12}.

-{\tt \hspace*{0.5in} (window-open w)} causes a window to be displayed

+\texttt{\hspace*{0.5in} (window-open w)} causes a window to be displayed

 on the screen.

-{\tt \hspace*{0.5in} (window-close w)} removes the window from the display;

+\texttt{\hspace*{0.5in} (window-close w)} removes the window from the display;

 it can be re-opened.

-{\tt \hspace*{0.5in} (window-destroy w)}

+\texttt{\hspace*{0.5in} (window-destroy w)}

-{\tt \hspace*{0.5in} (window-moveto-xy w x y)}

+\texttt{\hspace*{0.5in} (window-moveto-xy w x y)}

-{\tt \hspace*{0.5in} (window-geometry w)} queries X for the window geometry.

+\texttt{\hspace*{0.5in} (window-geometry w)} queries X for the window geometry.

 The result is a list, \linebreak

-{\tt (x y width height border-width)} .

+\texttt{(x y width height border-width)} .

-{\tt \hspace*{0.5in} (window-size w)} returns a list {\tt (width height)} .

+\texttt{\hspace*{0.5in} (window-size w)} returns a list

+\texttt{(width height)} .

 \vspace{-0.1in}

 Note that the width and height are cached within the structure so that no call

 to X is needed to examine them.  However, if the window is resized, it is

-necessary to call {\tt (window-reset-geometry\ w)} to reset the local

+necessary to call \texttt{(window-reset-geometry\ w)} to reset the local

 parameters to their correct values.

 % ; Paint in window with mouse \\   % these are not really working...

-% {\tt \hspace*{0.5in} (window-paint w)} \\

+% \texttt{\hspace*{0.5in} (window-paint w)} \\

 %

-% {\tt \hspace*{0.5in} (window-move w)} \\

+% \texttt{\hspace*{0.5in} (window-move w)} \\

 %

-% {\tt \hspace*{0.5in} (dowindowcom w)} \\

+% \texttt{\hspace*{0.5in} (dowindowcom w)} \\

-The following functions provide access to the parts of the {\tt window} data

+The following functions provide access to the parts of the \texttt{window} data

 structure; most applications will not need to use them. \\

 \vspace{-0.1in}

-{\tt \hspace*{0.5in} (window-gcontext        w)} \\

-{\tt \hspace*{0.5in} (window-parent          w)} \\

-{\tt \hspace*{0.5in} (window-drawable-height w)} \\

-{\tt \hspace*{0.5in} (window-drawable-width  w)} \\

-{\tt \hspace*{0.5in} (window-label           w)} \\

-{\tt \hspace*{0.5in} (window-font            w)} \\

-{\tt \hspace*{0.5in} (window-screen-height)} \\

+\texttt{\hspace*{0.5in} (window-gcontext        w)} \\

+\texttt{\hspace*{0.5in} (window-parent          w)} \\

+\texttt{\hspace*{0.5in} (window-drawable-height w)} \\

+\texttt{\hspace*{0.5in} (window-drawable-width  w)} \\

+\texttt{\hspace*{0.5in} (window-label           w)} \\

+\texttt{\hspace*{0.5in} (window-font            w)} \\

+\texttt{\hspace*{0.5in} (window-screen-height)} \\

 \section{Drawing Functions}

-{\tt \hspace*{0.5in} (window-clear w)} clears the window to the background

+\texttt{\hspace*{0.5in} (window-clear w)} clears the window to the background

 color.

-{\tt \hspace*{0.5in} (window-force-output \&optional w)}

+\texttt{\hspace*{0.5in} (window-force-output \&optional w)}

 \vspace{-0.1in}

 Communication between the running program and X windows is done through a

 stream; actual drawing on the display is done asynchronously.

-{\tt window-force-output} causes the current drawing commands, if any,

+\texttt{window-force-output} causes the current drawing commands, if any,

 to be sent to X.  Without this, commands may be left in the stream buffer and

-may appear not to have been executed.  The argument {\tt w} is not used.

+may appear not to have been executed.  The argument \texttt{w} is not used.

-In all of the drawing functions, the {\tt linewidth} argument is optional

-and defaults to {\tt 1}.

+In all of the drawing functions, the \texttt{linewidth} argument is optional

+and defaults to \texttt{1}.

 \vspace{0.1in}

-{\tt \hspace*{0.5in} (window-draw-line w from:vector to:vector linewidth)} \\

-{\tt \hspace*{0.5in}

+\texttt{\hspace*{0.5in} (window-draw-line w from:vector to:vector linewidth)} \\

+\texttt{\hspace*{0.5in}

  (window-draw-line-xy w x1 y1 x2 y2 \&optional linewidth op)} \\

- \hspace*{1.0in} {\tt op} may be {\tt xor} or {\tt erase}.

+ \hspace*{1.0in} \texttt{op} may be \texttt{xor} or \texttt{erase}.

 \vspace{0.1in}

-{\tt \hspace*{0.5in}

+\texttt{\hspace*{0.5in}

  (window-draw-arrow-xy w x1 y1 x2 y2 \&optional linewidth size)} \\

-{\tt \hspace*{0.5in}

+\texttt{\hspace*{0.5in}

  (window-draw-arrow2-xy w x1 y1 x2 y2 \&optional linewidth size)} \\

-{\tt \hspace*{0.5in}

+\texttt{\hspace*{0.5in}

  (window-draw-arrowhead-xy w x1 y1 x2 y2 \&optional linewidth size)}

 \vspace{-0.1in}

 These draw a line with an arrowhead at the second point, a line with an

 arrowhead at both points, or an arrowhead alone at the second point,

-respectively.  {\tt size} is the arrowhead size; the default is

-{\tt (+ 20 (* linewidth 5))}.

+respectively.  \texttt{size} is the arrowhead size; the default is

+\texttt{(+ 20 (* linewidth 5))}.

 \vspace{0.1in}

-{\tt \hspace*{0.5in} (window-draw-box-xy w x y width height linewidth)} \\

-{\tt \hspace*{0.5in} (window-xor-box-xy w x y width height linewidth)} \\

-{\tt \hspace*{0.5in} (window-draw-box w offset:vector size:vector linewidth)} \\

-{\tt \hspace*{0.5in} (window-draw-box-corners w x1 y1 x2 y2 linewidth)} \\

- \hspace*{1.0in} where {\tt (x1 y1)} and {\tt (x2 y2)} are opposite corners. \\

-{\tt \hspace*{0.5in} (window-draw-rcbox-xy w x y width height radius linewidth)} \\

+\texttt{\hspace*{0.5in} (window-draw-box-xy w x y width height linewidth)} \\

+\texttt{\hspace*{0.5in} (window-xor-box-xy w x y width height linewidth)} \\

+\texttt{\hspace*{0.5in} (window-draw-box w offset:vector size:vector linewidth)} \\

+\texttt{\hspace*{0.5in} (window-draw-box-corners w x1 y1 x2 y2 linewidth)} \\

+ \hspace*{1.0in} where \texttt{(x1 y1)} and \texttt{(x2 y2)} are opposite corners. \\

+\texttt{\hspace*{0.5in} (window-draw-rcbox-xy w x y width height radius linewidth)} \\

  \hspace*{1.0in} draws a box with rounded corners.

-{\tt \hspace*{0.5in} (window-draw-arc-xy w x y radiusx radiusy anglea angleb linewidth)}

+\texttt{\hspace*{0.5in} (window-draw-arc-xy w x y radiusx radiusy anglea angleb linewidth)}

 \vspace{-0.1in}

-{\tt anglea} is the angle, in degrees, at which the arc is started.

-{\tt angleb} is the angle, in degrees, that specifies the amount of arc

+\texttt{anglea} is the angle, in degrees, at which the arc is started.

+\texttt{angleb} is the angle, in degrees, that specifies the amount of arc

 to be drawn, counterclockwise from the starting position.

 \vspace{0.1in}

-{\tt \hspace*{0.5in} (window-draw-circle-xy w x y radius linewidth)} \\

-{\tt \hspace*{0.5in} (window-draw-circle w center:vector radius linewidth)} \\

-{\tt \hspace*{0.5in} (window-draw-ellipse-xy w x y radiusx radiusy linewidth)} \\

-{\tt \hspace*{0.5in} (window-draw-dot-xy w x y)}

+\texttt{\hspace*{0.5in} (window-draw-circle-xy w x y radius linewidth)} \\

+\texttt{\hspace*{0.5in} (window-draw-circle w center:vector radius linewidth)} \\

+\texttt{\hspace*{0.5in} (window-draw-ellipse-xy w x y radiusx radiusy linewidth)} \\

+\texttt{\hspace*{0.5in} (window-draw-dot-xy w x y)}

 \vspace{0.1in}

-{\tt \hspace*{0.5in} (window-erase-area-xy w left bottom width height)} \\

-{\tt \hspace*{0.5in} (window-erase-area w offset:vector size:vector)} \\

-{\tt \hspace*{0.5in} (window-copy-area-xy w fromx fromy	tox toy width height)} \\

-{\tt \hspace*{0.5in} (window-invert-area w offset:vector size:vector)} \\

-{\tt \hspace*{0.5in} (window-invert-area-xy w left bottom width height)}

+\texttt{\hspace*{0.5in} (window-erase-area-xy w left bottom width height)} \\

+\texttt{\hspace*{0.5in} (window-erase-area w offset:vector size:vector)} \\

+\texttt{\hspace*{0.5in} (window-copy-area-xy w fromx fromy	tox toy width height)} \\

+\texttt{\hspace*{0.5in} (window-invert-area w offset:vector size:vector)} \\

+\texttt{\hspace*{0.5in} (window-invert-area-xy w left bottom width height)}

 \vspace{0.1in}

-{\tt \hspace*{0.5in} (window-printat-xy w s x y)} \\

-{\tt \hspace*{0.5in} (window-printat w s at:vector)} \\

-{\tt \hspace*{0.5in} (window-prettyprintat-xy w s x y)} \\

-{\tt \hspace*{0.5in} (window-prettyprintat w s at:vector)} \\

+\texttt{\hspace*{0.5in} (window-printat-xy w s x y)} \\

+\texttt{\hspace*{0.5in} (window-printat w s at:vector)} \\

+\texttt{\hspace*{0.5in} (window-prettyprintat-xy w s x y)} \\

+\texttt{\hspace*{0.5in} (window-prettyprintat w s at:vector)} \\

 \vspace{-0.1in}

-The argument {\tt s} is printed at the specified position.