mcclim-devel

mcclim-devel@common-lisp.net

820 discussions

bug in transformations
by Paul Werkowski 23 Dec '20

23 Dec '20

I am working on getting McCLIM working on Lispworks7 on Windows 10. All is going well and I will have a few patches to contribute soon. I do have 32 bit Lispworks Professional here, with CLIM2, that I have been using for quite awhile now so I have my own code to use for testing the port. One fairly simple plotting program put up a frame with no complaints but appeared to show nothing on the screen. I traced the issue to a disagreement between clim2 and McCLIM implementations in transformation composition which caused my expected image to display way out of the clipping region. This bit of code shows the problem... (defun txf() (let ((scale-x 2.35) (scale-y 24.7) (origin-x 38.0) (origin-y 263.0)) (let* ((st (clim:make-scaling-transformation scale-x (- scale-y))) ;;#<CLIM-INTERNALS::STANDARD-HAIRY-TRANSFORMATION ;; 2.35 0 0 -24.7 0.0 0.0> (tt (clim:make-translation-transformation origin-x origin-y)) ;;#<CLIM-INTERNALS::STANDARD-TRANSLATION :DX 38.0 :DY 263.0> (ct1 (clim:compose-transformations tt st)) ; correct in clim2 & Mcclim ;;#<CLIM-INTERNALS::STANDARD-HAIRY-TRANSFORMATION 2.35 0.0 0.0 -24.7 38.0 263.0> <<<<< ;; McCLIM gets this wrong (assuming clim2 is correct). (ct2 (clim:compose-transformation-with-translation (clim:make-scaling-transformation scale-x (- scale-y)) origin-x origin-y)) ;;#<CLIM-INTERNALS::STANDARD-HAIRY-TRANSFORMATION ;; 2.35 0.0 0.0 -24.7 89.299996 -6496.1> <<<<< ) (values st tt ct1 ct2)))) Reading the clim2 spec, I think clim2 implements it correctly. Paul

2 2

cannot compile manual in Latex
by igor denisov 22 Nov '20

22 Nov '20

Hi there, Something is going wrong LaTeX$ make fig2dev -Lpdftex -m 0.75 native.fig native.pdf fig2dev -Lpdftex_t -m 0.75 -p native.pdf native.fig native.pdf_t pdflatex mcclim.tex This is pdfTeX, Version 3.14159265-2.6-1.40.18 (TeX Live 2017/Debian) (preloaded format=pdflatex) restricted \write18 enabled. entering extended mode (./mcclim.tex LaTeX2e <2017-04-15> Babel <3.18> and hyphenation patterns for 3 language(s) loaded. (/usr/share/texlive/texmf-dist/tex/latex/base/book.cls Document Class: book 2014/09/29 v1.4h Standard LaTeX document class (/usr/share/texlive/texmf-dist/tex/latex/base/bk11.clo)) (/usr/share/texlive/texmf-dist/tex/latex/geometry/geometry.sty (/usr/share/texlive/texmf-dist/tex/latex/graphics/keyval.sty) (/usr/share/texlive/texmf-dist/tex/generic/oberdiek/ifpdf.sty) (/usr/share/texlive/texmf-dist/tex/generic/oberdiek/ifvtex.sty) (/usr/share/texlive/texmf-dist/tex/generic/ifxetex/ifxetex.sty)) (/usr/share/texlive/texmf-dist/tex/latex/base/fontenc.sty (/usr/share/texlive/texmf-dist/tex/latex/base/t1enc.def) kpathsea: Running mktextfm ecrm1095 /usr/share/texlive/texmf-dist/web2c/mktexnam: Could not map source abbreviation for ecrm1095. /usr/share/texlive/texmf-dist/web2c/mktexnam: Need to update ? mktextfm: Running mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecrm1095 This is METAFONT, Version 2.7182818 (TeX Live 2017/Debian) (preloaded base=mf) kpathsea: Running mktexmf ecrm1095 ! I can't find file `ecrm1095'. <*> ...ljfour; mag:=1; nonstopmode; input ecrm1095 Please type another input file name ! Emergency stop. <*> ...ljfour; mag:=1; nonstopmode; input ecrm1095 Transcript written on mfput.log. grep: ecrm1095.log: No such file or directory mktextfm: `mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecrm1095' failed to make ecrm1095.tfm. kpathsea: Appending font creation commands to missfont.log. ! Font T1/cmr/m/n/10.95=ecrm1095 at 10.95pt not loadable: Metric (TFM) file not found. <to be read again> relax l.105 \fontencoding\encodingdefault\selectfont ? ) (/usr/share/texlive/texmf-dist/tex/latex/base/inputenc.sty (/usr/share/texlive/texmf-dist/tex/latex/base/utf8.def (/usr/share/texlive/texmf-dist/tex/latex/base/t1enc.dfu) (/usr/share/texlive/texmf-dist/tex/latex/base/ot1enc.dfu) (/usr/share/texlive/texmf-dist/tex/latex/base/omsenc.dfu))) (/usr/share/texlive/texmf-dist/tex/latex/base/alltt.sty) (/usr/share/texlive/texmf-dist/tex/latex/moreverb/moreverb.sty (/usr/share/texlive/texmf-dist/tex/latex/tools/verbatim.sty)) (/usr/share/texlive/texmf-dist/tex/latex/fancyvrb/fancyvrb.sty Style option: `fancyvrb' v2.7a, with DG/SPQR fixes, and firstline=lastline fix <2008/02/07> (tvz)) (/usr/share/texlive/texmf-dist/tex/latex/graphics/epsfig.sty (/usr/share/texlive/texmf-dist/tex/latex/graphics/graphicx.sty (/usr/share/texlive/texmf-dist/tex/latex/graphics/graphics.sty (/usr/share/texlive/texmf-dist/tex/latex/graphics/trig.sty) (/usr/share/texlive/texmf-dist/tex/latex/graphics-cfg/graphics.cfg) (/usr/share/texlive/texmf-dist/tex/latex/graphics-def/pdftex.def)))) (/usr/share/texlive/texmf-dist/tex/latex/base/makeidx.sty) (/usr/share/texlive/texmf-dist/tex/latex/float/float.sty) (/usr/share/texlive/texmf-dist/tex/latex/graphics/color.sty (/usr/share/texlive/texmf-dist/tex/latex/graphics-cfg/color.cfg)) (/usr/share/texlive/texmf-dist/tex/latex/amscls/amsthm.sty) (/usr/share/texlive/texmf-dist/tex/latex/changebar/changebar.sty) (/usr/share/texlive/texmf-dist/tex/latex/tocbibind/tocbibind.sty Package tocbibind Note: Using chapter style headings, unless overridden. ) (/usr/share/texlive/texmf-dist/tex/latex/shadow/shadow.sty) (/usr/share/texlive/texmf-dist/tex/latex/hyperref/hyperref.sty (/usr/share/texlive/texmf-dist/tex/generic/oberdiek/hobsub-hyperref.sty (/usr/share/texlive/texmf-dist/tex/generic/oberdiek/hobsub-generic.sty)) (/usr/share/texlive/texmf-dist/tex/latex/oberdiek/auxhook.sty) (/usr/share/texlive/texmf-dist/tex/latex/oberdiek/kvoptions.sty) (/usr/share/texlive/texmf-dist/tex/latex/hyperref/pd1enc.def) (/usr/share/texlive/texmf-dist/tex/latex/latexconfig/hyperref.cfg) (/usr/share/texlive/texmf-dist/tex/latex/url/url.sty)) (/usr/share/texlive/texmf-dist/tex/latex/hyperref/hpdftex.def (/usr/share/texlive/texmf-dist/tex/latex/oberdiek/rerunfilecheck.sty)) (./logos.tex) (./spec-macros.tex) (./refmacros.tex) (./other-macros.tex) Writing index file mcclim.idx (./mcclim.aux) *geometry* driver: auto-detecting *geometry* detected driver: pdftex (/usr/share/texlive/texmf-dist/tex/context/base/mkii/supp-pdf.mkii [Loading MPS to PDF converter (version 2006.09.02).] ) (/usr/share/texlive/texmf-dist/tex/latex/oberdiek/epstopdf-base.sty (/usr/share/texlive/texmf-dist/tex/latex/oberdiek/grfext.sty) (/usr/share/texlive/texmf-dist/tex/latex/latexconfig/epstopdf-sys.cfg)) (/usr/share/texlive/texmf-dist/tex/latex/hyperref/nameref.sty (/usr/share/texlive/texmf-dist/tex/generic/oberdiek/gettitlestring.sty)) (./mcclim.out) (./mcclim.out) kpathsea: Running mktextfm ecrm1728 /usr/share/texlive/texmf-dist/web2c/mktexnam: Could not map source abbreviation for ecrm1728. /usr/share/texlive/texmf-dist/web2c/mktexnam: Need to update ? mktextfm: Running mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecrm1728 This is METAFONT, Version 2.7182818 (TeX Live 2017/Debian) (preloaded base=mf) kpathsea: Running mktexmf ecrm1728 ! I can't find file `ecrm1728'. <*> ...ljfour; mag:=1; nonstopmode; input ecrm1728 Please type another input file name ! Emergency stop. <*> ...ljfour; mag:=1; nonstopmode; input ecrm1728 Transcript written on mfput.log. grep: ecrm1728.log: No such file or directory mktextfm: `mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecrm1728' failed to make ecrm1728.tfm. ! Font T1/cmr/m/n/17.28=ecrm1728 at 17.28pt not loadable: Metric (TFM) file not found. <to be read again> relax l.93 ? kpathsea: Running mktextfm ecrm2488 /usr/share/texlive/texmf-dist/web2c/mktexnam: Could not map source abbreviation for ecrm2488. /usr/share/texlive/texmf-dist/web2c/mktexnam: Need to update ? mktextfm: Running mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecrm2488 This is METAFONT, Version 2.7182818 (TeX Live 2017/Debian) (preloaded base=mf) kpathsea: Running mktexmf ecrm2488 ! I can't find file `ecrm2488'. <*> ...ljfour; mag:=1; nonstopmode; input ecrm2488 Please type another input file name ! Emergency stop. <*> ...ljfour; mag:=1; nonstopmode; input ecrm2488 Transcript written on mfput.log. grep: ecrm2488.log: No such file or directory mktextfm: `mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecrm2488' failed to make ecrm2488.tfm. ! Font T1/cmr/m/n/24.88=ecrm2488 at 24.88pt not loadable: Metric (TFM) file not found. <to be read again> relax l.93 ? kpathsea: Running mktextfm ecrm1200 /usr/share/texlive/texmf-dist/web2c/mktexnam: Could not map source abbreviation for ecrm1200. /usr/share/texlive/texmf-dist/web2c/mktexnam: Need to update ? mktextfm: Running mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecrm1200 This is METAFONT, Version 2.7182818 (TeX Live 2017/Debian) (preloaded base=mf) kpathsea: Running mktexmf ecrm1200 ! I can't find file `ecrm1200'. <*> ...ljfour; mag:=1; nonstopmode; input ecrm1200 Please type another input file name ! Emergency stop. <*> ...ljfour; mag:=1; nonstopmode; input ecrm1200 Transcript written on mfput.log. grep: ecrm1200.log: No such file or directory mktextfm: `mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecrm1200' failed to make ecrm1200.tfm. ! Font T1/cmr/m/n/12=ecrm1200 at 12.0pt not loadable: Metric (TFM) file not fou nd. <to be read again> relax l.93 ? [1] kpathsea: Running mktextfm ecsl1095 /usr/share/texlive/texmf-dist/web2c/mktexnam: Could not map source abbreviation for ecsl1095. /usr/share/texlive/texmf-dist/web2c/mktexnam: Need to update ? mktextfm: Running mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecsl1095 This is METAFONT, Version 2.7182818 (TeX Live 2017/Debian) (preloaded base=mf) kpathsea: Running mktexmf ecsl1095 ! I can't find file `ecsl1095'. <*> ...ljfour; mag:=1; nonstopmode; input ecsl1095 Please type another input file name ! Emergency stop. <*> ...ljfour; mag:=1; nonstopmode; input ecsl1095 Transcript written on mfput.log. grep: ecsl1095.log: No such file or directory mktextfm: `mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecsl1095' failed to make ecsl1095.tfm. ! Font T1/cmr/m/sl/10.95=ecsl1095 at 10.95pt not loadable: Metric (TFM) file no t found. <to be read again> relax l.97 \tableofcontents } ? [2] kpathsea: Running mktextfm ecbx2488 /usr/share/texlive/texmf-dist/web2c/mktexnam: Could not map source abbreviation for ecbx2488. /usr/share/texlive/texmf-dist/web2c/mktexnam: Need to update ? mktextfm: Running mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecbx2488 This is METAFONT, Version 2.7182818 (TeX Live 2017/Debian) (preloaded base=mf) kpathsea: Running mktexmf ecbx2488 ! I can't find file `ecbx2488'. <*> ...ljfour; mag:=1; nonstopmode; input ecbx2488 Please type another input file name ! Emergency stop. <*> ...ljfour; mag:=1; nonstopmode; input ecbx2488 Transcript written on mfput.log. grep: ecbx2488.log: No such file or directory mktextfm: `mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecbx2488' failed to make ecbx2488.tfm. ! Font T1/cmr/bx/n/24.88=ecbx2488 at 24.88pt not loadable: Metric (TFM) file no t found. <to be read again> relax l.97 \tableofcontents } ? (./mcclim.toc) (./chap-intro.tex [3] [4] Chapter 1. kpathsea: Running mktextfm ecrm2074 /usr/share/texlive/texmf-dist/web2c/mktexnam: Could not map source abbreviation for ecrm2074. /usr/share/texlive/texmf-dist/web2c/mktexnam: Need to update ? mktextfm: Running mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecrm2074 This is METAFONT, Version 2.7182818 (TeX Live 2017/Debian) (preloaded base=mf) kpathsea: Running mktexmf ecrm2074 ! I can't find file `ecrm2074'. <*> ...ljfour; mag:=1; nonstopmode; input ecrm2074 Please type another input file name ! Emergency stop. <*> ...ljfour; mag:=1; nonstopmode; input ecrm2074 Transcript written on mfput.log. grep: ecrm2074.log: No such file or directory mktextfm: `mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecrm2074' failed to make ecrm2074.tfm. ! Font T1/cmr/m/n/20.74=ecrm2074 at 20.74pt not loadable: Metric (TFM) file not found. <to be read again> relax l.1 \chapter{Introduction} ? kpathsea: Running mktextfm ecbx2074 /usr/share/texlive/texmf-dist/web2c/mktexnam: Could not map source abbreviation for ecbx2074. /usr/share/texlive/texmf-dist/web2c/mktexnam: Need to update ? mktextfm: Running mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecbx2074 This is METAFONT, Version 2.7182818 (TeX Live 2017/Debian) (preloaded base=mf) kpathsea: Running mktexmf ecbx2074 ! I can't find file `ecbx2074'. <*> ...ljfour; mag:=1; nonstopmode; input ecbx2074 Please type another input file name ! Emergency stop. <*> ...ljfour; mag:=1; nonstopmode; input ecbx2074 Transcript written on mfput.log. grep: ecbx2074.log: No such file or directory mktextfm: `mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecbx2074' failed to make ecbx2074.tfm. ! Font T1/cmr/bx/n/20.74=ecbx2074 at 20.74pt not loadable: Metric (TFM) file no t found. <to be read again> relax l.1 \chapter{Introduction} ? kpathsea: Running mktextfm ecrm1440 /usr/share/texlive/texmf-dist/web2c/mktexnam: Could not map source abbreviation for ecrm1440. /usr/share/texlive/texmf-dist/web2c/mktexnam: Need to update ? mktextfm: Running mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecrm1440 This is METAFONT, Version 2.7182818 (TeX Live 2017/Debian) (preloaded base=mf) kpathsea: Running mktexmf ecrm1440 ! I can't find file `ecrm1440'. <*> ...ljfour; mag:=1; nonstopmode; input ecrm1440 Please type another input file name ! Emergency stop. <*> ...ljfour; mag:=1; nonstopmode; input ecrm1440 Transcript written on mfput.log. grep: ecrm1440.log: No such file or directory mktextfm: `mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecrm1440' failed to make ecrm1440.tfm. ! Font T1/cmr/m/n/14.4=ecrm1440 at 14.4pt not loadable: Metric (TFM) file not f ound. <to be read again> relax l.27 T his manual documents McCLIM which is a mostly ? kpathsea: Running mktextfm ecbx1440 /usr/share/texlive/texmf-dist/web2c/mktexnam: Could not map source abbreviation for ecbx1440. /usr/share/texlive/texmf-dist/web2c/mktexnam: Need to update ? mktextfm: Running mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecbx1440 This is METAFONT, Version 2.7182818 (TeX Live 2017/Debian) (preloaded base=mf) kpathsea: Running mktexmf ecbx1440 ! I can't find file `ecbx1440'. <*> ...ljfour; mag:=1; nonstopmode; input ecbx1440 Please type another input file name ! Emergency stop. <*> ...ljfour; mag:=1; nonstopmode; input ecbx1440 Transcript written on mfput.log. grep: ecbx1440.log: No such file or directory mktextfm: `mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecbx1440' failed to make ecbx1440.tfm. ! Font T1/cmr/bx/n/14.4=ecbx1440 at 14.4pt not loadable: Metric (TFM) file not found. <to be read again> relax l.27 T his manual documents McCLIM which is a mostly ? kpathsea: Running mktextfm ecti1095 /usr/share/texlive/texmf-dist/web2c/mktexnam: Could not map source abbreviation for ecti1095. /usr/share/texlive/texmf-dist/web2c/mktexnam: Need to update ? mktextfm: Running mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecti1095 This is METAFONT, Version 2.7182818 (TeX Live 2017/Debian) (preloaded base=mf) kpathsea: Running mktexmf ecti1095 ! I can't find file `ecti1095'. <*> ...ljfour; mag:=1; nonstopmode; input ecti1095 Please type another input file name ! Emergency stop. <*> ...ljfour; mag:=1; nonstopmode; input ecti1095 Transcript written on mfput.log. grep: ecti1095.log: No such file or directory mktextfm: `mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecti1095' failed to make ecti1095.tfm. ! Font T1/cmr/m/it/10.95=ecti1095 at 10.95pt not loadable: Metric (TFM) file no t found. <to be read again> relax l.49 it is an \emph{interface manager} , i.e. it is a complete mediator ? [1] (/usr/share/texlive/texmf-dist/tex/latex/base/omscmr.fd)) [2{/var/lib/texmf /fonts/map/pdftex/updmap/pdftex.map}] [3] [4] (./chap-first-application.tex Chapter 2. (/usr/share/texlive/texmf-dist/tex/latex/base/t1cmtt.fd) kpathsea: Running mktextfm ectt1095 /usr/share/texlive/texmf-dist/web2c/mktexnam: Could not map source abbreviation for ectt1095. /usr/share/texlive/texmf-dist/web2c/mktexnam: Need to update ? mktextfm: Running mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ectt1095 This is METAFONT, Version 2.7182818 (TeX Live 2017/Debian) (preloaded base=mf) kpathsea: Running mktexmf ectt1095 ! I can't find file `ectt1095'. <*> ...ljfour; mag:=1; nonstopmode; input ectt1095 Please type another input file name ! Emergency stop. <*> ...ljfour; mag:=1; nonstopmode; input ectt1095 Transcript written on mfput.log. grep: ectt1095.log: No such file or directory mktextfm: `mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ectt1095' failed to make ectt1095.tfm. ! Font T1/cmtt/m/n/10.95=ectt1095 at 10.95pt not loadable: Metric (TFM) file no t found. <to be read again> relax l.26 panes such as \pane{hbox} , \pane{vbox} to arrange other panes ? kpathsea: Running mktextfm ecbx1095 /usr/share/texlive/texmf-dist/web2c/mktexnam: Could not map source abbreviation for ecbx1095. /usr/share/texlive/texmf-dist/web2c/mktexnam: Need to update ? mktextfm: Running mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecbx1095 This is METAFONT, Version 2.7182818 (TeX Live 2017/Debian) (preloaded base=mf) kpathsea: Running mktexmf ecbx1095 ! I can't find file `ecbx1095'. <*> ...ljfour; mag:=1; nonstopmode; input ecbx1095 Please type another input file name ! Emergency stop. <*> ...ljfour; mag:=1; nonstopmode; input ecbx1095 Transcript written on mfput.log. grep: ecbx1095.log: No such file or directory mktextfm: `mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecbx1095' failed to make ecbx1095.tfm. ! Font T1/cmr/bx/n/10.95=ecbx1095 at 10.95pt not loadable: Metric (TFM) file no t found. <to be read again> relax l.60 \item[Simple application:] Very simple applications have no internal ? kpathsea: Running mktextfm ecrm0800 /usr/share/texlive/texmf-dist/web2c/mktexnam: Could not map source abbreviation for ecrm0800. /usr/share/texlive/texmf-dist/web2c/mktexnam: Need to update ? mktextfm: Running mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecrm0800 This is METAFONT, Version 2.7182818 (TeX Live 2017/Debian) (preloaded base=mf) kpathsea: Running mktexmf ecrm0800 ! I can't find file `ecrm0800'. <*> ...ljfour; mag:=1; nonstopmode; input ecrm0800 Please type another input file name ! Emergency stop. <*> ...ljfour; mag:=1; nonstopmode; input ecrm0800 Transcript written on mfput.log. grep: ecrm0800.log: No such file or directory mktextfm: `mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecrm0800' failed to make ecrm0800.tfm. ! Font T1/cmr/m/n/8=ecrm0800 at 8.0pt not loadable: Metric (TFM) file not found . <to be read again> relax l.67 ...cing the rendering instructions \footnote{ rendering is ? kpathsea: Running mktextfm ecrm0900 /usr/share/texlive/texmf-dist/web2c/mktexnam: Could not map source abbreviation for ecrm0900. /usr/share/texlive/texmf-dist/web2c/mktexnam: Need to update ? mktextfm: Running mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecrm0900 This is METAFONT, Version 2.7182818 (TeX Live 2017/Debian) (preloaded base=mf) kpathsea: Running mktexmf ecrm0900 ! I can't find file `ecrm0900'. <*> ...ljfour; mag:=1; nonstopmode; input ecrm0900 Please type another input file name ! Emergency stop. <*> ...ljfour; mag:=1; nonstopmode; input ecrm0900 Transcript written on mfput.log. grep: ecrm0900.log: No such file or directory mktextfm: `mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecrm0900' failed to make ecrm0900.tfm. ! Font T1/cmr/m/n/9=ecrm0900 at 9.0pt not loadable: Metric (TFM) file not found . <to be read again> relax l.69 backend.} that result from drawing the new output record. If ? kpathsea: Running mktextfm ecrm0600 /usr/share/texlive/texmf-dist/web2c/mktexnam: Could not map source abbreviation for ecrm0600. /usr/share/texlive/texmf-dist/web2c/mktexnam: Need to update ? mktextfm: Running mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecrm0600 This is METAFONT, Version 2.7182818 (TeX Live 2017/Debian) (preloaded base=mf) kpathsea: Running mktexmf ecrm0600 ! I can't find file `ecrm0600'. <*> ...ljfour; mag:=1; nonstopmode; input ecrm0600 Please type another input file name ! Emergency stop. <*> ...ljfour; mag:=1; nonstopmode; input ecrm0600 Transcript written on mfput.log. grep: ecrm0600.log: No such file or directory mktextfm: `mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecrm0600' failed to make ecrm0600.tfm. ! Font T1/cmr/m/n/6=ecrm0600 at 6.0pt not loadable: Metric (TFM) file not found . <to be read again> relax l.69 backend.} that result from drawing the new output record. If ? [5] [6] [7] Underfull \vbox (badness 10000) has occurred while \output is active [8] kpathsea: Running mktextfm ecit1095 /usr/share/texlive/texmf-dist/web2c/mktexnam: Could not map source abbreviation for ecit1095. /usr/share/texlive/texmf-dist/web2c/mktexnam: Need to update ? mktextfm: Running mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecit1095 This is METAFONT, Version 2.7182818 (TeX Live 2017/Debian) (preloaded base=mf) kpathsea: Running mktexmf ecit1095 ! I can't find file `ecit1095'. <*> ...ljfour; mag:=1; nonstopmode; input ecit1095 Please type another input file name ! Emergency stop. <*> ...ljfour; mag:=1; nonstopmode; input ecit1095 Transcript written on mfput.log. grep: ecit1095.log: No such file or directory mktextfm: `mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecit1095' failed to make ecit1095.tfm. ! Font T1/cmtt/m/it/10.95=ecit1095 at 10.95pt not loadable: Metric (TFM) file n ot found. <to be read again> relax l.274 ...t{define-}\textit{name}\texttt{-command}} , where ? [9] [10 <./ex2-screenshot.png>] Underfull \vbox (badness 10000) has occurred while \output is active [11] [12] Underfull \vbox (badness 10000) has occurred while \output is active [13] Underfull \vbox (badness 10000) has occurred while \output is active [14]) (./part-reference.tex [15] [16] [17] [18] (./chap-concepts.tex Chapter 3. ) (./chap-sheet-hierarchy.tex [19] [20] Chapter 4. LaTeX Warning: Reference `fignative' on page 21 undefined on input line 36. (./native.pdf_t pdfTeX warning: pdflatex (file ./native.pdf): PDF inclusion: found PDF version <1.7>, but at most version <1.5> allowed ) [21] [22 <./native.pdf>] [23] [24] [25] LaTeX Warning: Reference `secmoving' on page 26 undefined on input line 378. LaTeX Warning: Reference `secmoving' on page 26 undefined on input line 387. ) (./chap-using-presentation-types.tex [26] [27] [28] Chapter 5. [29]) (./chap-using-views.tex [30] Chapter 6. [31] Underfull \vbox (badness 10000) has occurred while \output is active [32] Underfull \vbox (badness 10000) has occurred while \output is active [33]) (./chap-using-command-tables.tex [34] Chapter 7. ) (./chap-windowing-drawing.tex [35] [36] Chapter 8. ) (./chap-clim-drawing.tex [37] [38] Chapter 9. ) (./chap-panes.tex [39] [40] Chapter 10. kpathsea: Running mktextfm ectt0900 /usr/share/texlive/texmf-dist/web2c/mktexnam: Could not map source abbreviation for ectt0900. /usr/share/texlive/texmf-dist/web2c/mktexnam: Need to update ? mktextfm: Running mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ectt0900 This is METAFONT, Version 2.7182818 (TeX Live 2017/Debian) (preloaded base=mf) kpathsea: Running mktexmf ectt0900 ! I can't find file `ectt0900'. <*> ...ljfour; mag:=1; nonstopmode; input ectt0900 Please type another input file name ! Emergency stop. <*> ...ljfour; mag:=1; nonstopmode; input ectt0900 Transcript written on mfput.log. grep: ectt0900.log: No such file or directory mktextfm: `mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ectt0900' failed to make ectt0900.tfm. ! Font T1/cmtt/m/n/9=ectt0900 at 9.0pt not loadable: Metric (TFM) file not foun d. <to be read again> relax l.79 specification.} ? [41] LaTeX Warning: Reference `sec-panes-creating' on page 42 undefined on input lin e 117. LaTeX Warning: Reference `sec-panes-creating' on page 42 undefined on input lin e 142. [42] kpathsea: Running mktextfm ecbx1200 /usr/share/texlive/texmf-dist/web2c/mktexnam: Could not map source abbreviation for ecbx1200. /usr/share/texlive/texmf-dist/web2c/mktexnam: Need to update ? mktextfm: Running mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecbx1200 This is METAFONT, Version 2.7182818 (TeX Live 2017/Debian) (preloaded base=mf) kpathsea: Running mktexmf ecbx1200 ! I can't find file `ecbx1200'. <*> ...ljfour; mag:=1; nonstopmode; input ecbx1200 Please type another input file name ! Emergency stop. <*> ...ljfour; mag:=1; nonstopmode; input ecbx1200 Transcript written on mfput.log. grep: ecbx1200.log: No such file or directory mktextfm: `mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecbx1200' failed to make ecbx1200.tfm. ! Font T1/cmr/bx/n/12=ecbx1200 at 12.0pt not loadable: Metric (TFM) file not fo und. <to be read again> relax l.233 T he space composition is accomplished by the generic function ? LaTeX Warning: Reference `space-allocation' on page 43 undefined on input line 245. ) (./chap-menu-bar.tex [43] [44] Chapter 11. LaTeX Warning: Reference `using-command-tables' on page 45 undefined on input l ine 35. LaTeX Warning: Reference `modifying-menu-items' on page 45 undefined on input l ine 41. [45]) (./chap-output-protocol.tex [46] Chapter 12. ) (./chap-incremental-redisplay.tex Underfull \vbox (badness 10000) has occurred while \output is active [47] [48] Chapter 13. kpathsea: Running mktextfm ecti0900 /usr/share/texlive/texmf-dist/web2c/mktexnam: Could not map source abbreviation for ecti0900. /usr/share/texlive/texmf-dist/web2c/mktexnam: Need to update ? mktextfm: Running mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecti0900 This is METAFONT, Version 2.7182818 (TeX Live 2017/Debian) (preloaded base=mf) kpathsea: Running mktexmf ecti0900 ! I can't find file `ecti0900'. <*> ...ljfour; mag:=1; nonstopmode; input ecti0900 Please type another input file name ! Emergency stop. <*> ...ljfour; mag:=1; nonstopmode; input ecti0900 Transcript written on mfput.log. grep: ecti0900.log: No such file or directory mktextfm: `mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ecti0900' failed to make ecti0900.tfm. ! Font T1/cmr/m/it/9=ecti0900 at 9.0pt not loadable: Metric (TFM) file not foun d. <to be read again> relax l.20 user.} contained in one or more slots in the application frame. ? )) [49] [50] [51] [52] (./chap-demos-and-applications.tex Chapter 14. [53] [54] [55]) [56] [57] [58] (./chap-raster-image.tex Chapter 15. [59]) (./part-spec-issues.tex [60] [61] [62] (./chap-spec-issue-pane-names.tex [63] [64] Chapter 16. kpathsea: Running mktextfm ectt1200 /usr/share/texlive/texmf-dist/web2c/mktexnam: Could not map source abbreviation for ectt1200. /usr/share/texlive/texmf-dist/web2c/mktexnam: Need to update ? mktextfm: Running mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ectt1200 This is METAFONT, Version 2.7182818 (TeX Live 2017/Debian) (preloaded base=mf) kpathsea: Running mktexmf ectt1200 ! I can't find file `ectt1200'. <*> ...ljfour; mag:=1; nonstopmode; input ectt1200 Please type another input file name ! Emergency stop. <*> ...ljfour; mag:=1; nonstopmode; input ectt1200 Transcript written on mfput.log. grep: ectt1200.log: No such file or directory mktextfm: `mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input ectt1200' failed to make ectt1200.tfm. ! Font T1/cmtt/bx/n/12=ectt1200 at 12.0pt not loadable: Metric (TFM) file not f ound. <to be read again> relax l.39 T he description of the generic function \texttt{frame-standard-output} ? kpathsea: Running mktextfm nullfont /usr/share/texlive/texmf-dist/web2c/mktexnam: Could not map source abbreviation for nullfont. /usr/share/texlive/texmf-dist/web2c/mktexnam: Need to update ? mktextfm: Running mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input nullfont This is METAFONT, Version 2.7182818 (TeX Live 2017/Debian) (preloaded base=mf) kpathsea: Running mktexmf nullfont ! I can't find file `nullfont'. <*> ...ljfour; mag:=1; nonstopmode; input nullfont Please type another input file name ! Emergency stop. <*> ...ljfour; mag:=1; nonstopmode; input nullfont Transcript written on mfput.log. grep: nullfont.log: No such file or directory mktextfm: `mf-nowin -progname=mf \mode:=ljfour; mag:=1; nonstopmode; input nullfont' failed to make nullfont.tfm. ! Font \T1/cmtt/m/n/12=nullfont not loadable: Metric (TFM) file not found. <to be read again> \relax l.39 T he description of the generic function \texttt{frame-standard-output} ? LaTeX Warning: Reference `sec-spec-issue-pane-name-pane-initialization-and-pane -properties' on page 65 undefined on input line 50. Underfull \vbox (badness 10000) has occurred while \output is active [65])) No file mcclim.bbl. No file mcclim.ind. [66] (./mcclim.aux) Package rerunfilecheck Warning: File `mcclim.out' has changed. (rerunfilecheck) Rerun to get outlines right (rerunfilecheck) or use package `bookmark'. LaTeX Warning: There were undefined references. LaTeX Warning: Label(s) may have changed. Rerun to get cross-references right. )</usr/share/texlive/texmf-dist/fonts/type1/public/amsfonts/cm/cmex10.pfb></us r/share/texlive/texmf-dist/fonts/type1/public/amsfonts/cm/cmmi10.pfb></usr/shar e/texlive/texmf-dist/fonts/type1/public/amsfonts/cm/cmmi8.pfb ></usr/share/texli ve/texmf-dist/fonts/type1/public/amsfonts/cm/cmr10.pfb></usr/share/texlive/texm f-dist/fonts/type1/public/amsfonts/cm/cmr8.pfb></usr/share/texlive/texmf-dist/f onts/type1/public/amsfonts/cm/cmsy10.pfb></usr/share/texlive/texmf-dist/fonts/t ype1/public/amsfonts/cm/cmsy8.pfb> Output written on mcclim.pdf (70 pages, 91667 bytes). Transcript written on mcclim.log. Makefile:22: recipe for target 'mcclim.pdf' failed make: *** [mcclim.pdf] Error 1

1 0

need help
by igor denisov 22 Nov '20

22 Nov '20

Hi there, I am stack, (in-package :common-lisp-user) (defpackage :first-app (:use :clim :clim-lisp) (:export first-app)) (in-package :first-app) (defun av-test-display-screen (frame pane) (declare (ignore frame)) (with-text-size (pane :large) (fresh-line pane) (present '(com-reset-clock-1) 'command :stream pane) (fresh-line pane))) (define-application-frame av-test () ((own-window-p :initform nil)) (:menu-bar t) (:panes (screen :application :display-time t :display-function #'av-test-display-screen :text-style (make-text-style :sans-serif :roman :normal)) (interactor :interactor :min-width 600) (doc :pointer-documentation)) (:layouts (defaults (vertically () screen interactor doc)))) (defun reset-clock-1 (&key (stream *query-io*) (ow t)) (multiple-value-bind (second minute hour day month) (decode-universal-time (get-universal-time)) (declare (ignore second)) (restart-case (progn (clim:accepting-values (stream :own-window ow) ;; ???????????????????????? ;; expands (*query-io* :own-window t) (format stream "Enter the time~%") (setq month (clim:accept 'integer :stream stream :default month :prompt "Month")) (terpri stream) (setq day (clim:accept 'integer :stream stream :default day :prompt "Day")) (terpri stream) (setq hour (clim:accept 'integer :stream stream :default hour :prompt "Hour")) (terpri stream) (setq minute (clim:accept 'integer :stream stream :default minute :prompt "Minute"))) (format nil "New values: Month: ~D, Day: ~D, Time: ~D:~2,'0D." month day hour minute)) (abort () (format nil "Time not set"))))) (define-av-test-command (com-reset-clock-1 :name t :menu nil) () (with-slots (own-window-p) clim:*application-frame* (format t "Result: ~S~%" (multiple-value-list (reset-clock-1 :ow own-window-p) ;;;;??????????????????????????????????????????????????? ;;; expands ;;;(clim:accepting-values (*query-io* :own-window nil)...) Am I right here? ;;; and I do not know how to see the :own-window value during call of reset-clock-1 ))) (finish-output *standard-output*)) (defun first-app () (run-frame-top-level (make-application-frame 'av-test))) describe is a strange tool, it describes even :foo, :bar, foo, bar and they have nothing to do in the code

1 0

how to look into package
by igor denisov 22 Nov '20

22 Nov '20

I know how stupid it is, but I need to see inside of package Keyword and do not know how. Help please. best, Igor

2 1

wantt to see inside standard-application-frame class
by igor denisov 21 Nov '20

21 Nov '20

Hi there CL-USER> (ql:quickload "mcclim") To load "mcclim": Load 1 ASDF system: mcclim ; Loading "mcclim" .............. ("mcclim") CL-USER> (in-package :clim-user) #<PACKAGE "CLIM-USER"> CLIM-USER> (defvar *c*) *C* CLIM-USER> (setf *c* (make-instance 'standard-application-frame)) #<STANDARD-APPLICATION-FRAME {1006FD6F63}> CLIM-USER> *c* #<STANDARD-APPLICATION-FRAME {1006FD6F63}> CLIM-USER> Now I can use slot-value (slot-value *c* slot-name) can you give me all slot-names of standard-application-frame class That's the point of all of it. Be good to me. I need that slot names.

1 0

CLIM specification document
by igor denisov 21 Nov '20

21 Nov '20

Hi there, may you tell me how to escape this Specification$ sudo make [sudo] password for wool: /bin/sh: 1: ./find-graphics: Permission denied pdflatex clim.tex This is pdfTeX, Version 3.14159265-2.6-1.40.18 (TeX Live 2017/Debian) (preloaded format=pdflatex) restricted \write18 enabled. entering extended mode (./clim.tex LaTeX2e <2017-04-15> Babel <3.18> and hyphenation patterns for 3 language(s) loaded. (/usr/share/texlive/texmf-dist/tex/latex/base/report.cls Document Class: report 2014/09/29 v1.4h Standard LaTeX document class (/usr/share/texlive/texmf-dist/tex/latex/base/size10.clo)) (/usr/share/texlive/texmf-dist/tex/latex/base/makeidx.sty) (/usr/share/texlive/texmf-dist/tex/latex/graphics/graphicx.sty (/usr/share/texlive/texmf-dist/tex/latex/graphics/keyval.sty) (/usr/share/texlive/texmf-dist/tex/latex/graphics/graphics.sty (/usr/share/texlive/texmf-dist/tex/latex/graphics/trig.sty) (/usr/share/texlive/texmf-dist/tex/latex/graphics-cfg/graphics.cfg) (/usr/share/texlive/texmf-dist/tex/latex/graphics-def/pdftex.def))) (/usr/share/texlive/texmf-dist/tex/latex/hyperref/hyperref.sty (/usr/share/texlive/texmf-dist/tex/generic/oberdiek/hobsub-hyperref.sty (/usr/share/texlive/texmf-dist/tex/generic/oberdiek/hobsub-generic.sty)) (/usr/share/texlive/texmf-dist/tex/generic/ifxetex/ifxetex.sty) (/usr/share/texlive/texmf-dist/tex/latex/oberdiek/auxhook.sty) (/usr/share/texlive/texmf-dist/tex/latex/oberdiek/kvoptions.sty) (/usr/share/texlive/texmf-dist/tex/latex/hyperref/pd1enc.def) (/usr/share/texlive/texmf-dist/tex/latex/latexconfig/hyperref.cfg) (/usr/share/texlive/texmf-dist/tex/latex/url/url.sty)) (/usr/share/texlive/texmf-dist/tex/latex/hyperref/hpdftex.def (/usr/share/texlive/texmf-dist/tex/latex/oberdiek/rerunfilecheck.sty)) Writing index file clim.idx (./psfig+.tex psfig/tex 1.2-dvi2ps-li ) \(a)input{spec-macros.aux} (./spec-macros.tex) No file clim.aux. (/usr/share/texlive/texmf-dist/tex/context/base/mkii/supp-pdf.mkii [Loading MPS to PDF converter (version 2006.09.02).] ) (/usr/share/texlive/texmf-dist/tex/latex/oberdiek/epstopdf-base.sty (/usr/share/texlive/texmf-dist/tex/latex/oberdiek/grfext.sty) (/usr/share/texlive/texmf-dist/tex/latex/latexconfig/epstopdf-sys.cfg)) (/usr/share/texlive/texmf-dist/tex/latex/hyperref/nameref.sty (/usr/share/texlive/texmf-dist/tex/generic/oberdiek/gettitlestring.sty)) [1{/var/lib/texmf/fonts/map/pdftex/updmap/pdftex.map}] [1] (./acknowledgments.tex) [2]pdfTeX warning (ext4): destination with the same ide ntifier (name{page.1}) has been already used, duplicate ignored <to be read again> \relax l.105 \part{Overview and Conventions} [1] (./overview.tex Chapter 1. [2]) (./conventions.tex [3] [4] Chapter 2. [5] [6] [7] (/usr/share/texlive/texmf-dist/tex/latex/base/omscmr.fd) [8] [9] [10]) [11] [12] (./regions.tex Chapter 3. LaTeX Warning: Reference `transforms' on page 13 undefined on input line 10. [13] LaTeX Warning: Reference `designs' on page 14 undefined on input line 52. LaTeX Warning: Reference `color' on page 14 undefined on input line 60. [14] Overfull \hbox (4.61629pt too wide) in paragraph at lines 140--143 []\OT1/cmr/m/n/10 The meth-ods for \OT1/cmtt/m/n/10 region-equal\OT1/cmr/m/n/10 , \OT1/cmtt/m/n/10 region-contains-region-p\OT1/cmr/m/n/10 , and \OT1/cmtt/m/n /10 region-intersects-region- [15] Overfull \hbox (4.86742pt too wide) in paragraph at lines 169--172 []\OT1/cmr/m/n/10 Returns \OT1/cmr/m/sl/10 false \OT1/cmr/m/n/10 if \OT1/cmtt/m /n/10 region-intersection \OT1/cmr/m/n/10 of the two \OT1/cmr/m/sl/10 re-gions \OT1/cmr/m/it/10 re-gion1 \OT1/cmr/m/n/10 and \OT1/cmr/m/it/10 re-gion2 \OT1/cm r/m/n/10 would be \OT1/cmtt/m/n/10 +nowhere+\OT1/cmr/m/n/10 , [16] ! LaTeX Error: File `region-normalization' not found. See the LaTeX manual or LaTeX Companion for explanation. Type H <return> for immediate help. ... l.270 ...e{\includegraphics{region-normalization}} ? [17] ! LaTeX Error: File `region-composition' not found. See the LaTeX manual or LaTeX Companion for explanation. Type H <return> for immediate help. ... l.322 ...ine{\includegraphics{region-composition}} ? [18] ! LaTeX Error: File `region-structure' not found. See the LaTeX manual or LaTeX Companion for explanation. Type H <return> for immediate help. ... l.355 ...rline{\includegraphics{region-structure}} ? LaTeX Warning: Reference `graphics' on page 19 undefined on input line 369. [19] [20] [21] [22] [23] Overfull \hbox (1.39581pt too wide) in paragraph at lines 669--672 []\OT1/cmr/m/n/10 CLIM will sup-ply de-fault meth-ods for these four generic fu nc-tions on the pro-to-col class \OT1/cmtt/m/n/10 rectangle Overfull \hbox (1.39581pt too wide) in paragraph at lines 684--687 []\OT1/cmr/m/n/10 CLIM will sup-ply de-fault meth-ods for these four generic fu nc-tions on the pro-to-col class \OT1/cmtt/m/n/10 rectangle [24] ! LaTeX Error: File `different-ellipses' not found. See the LaTeX manual or LaTeX Companion for explanation. Type H <return> for immediate help. ... l.724 ...ine{\includegraphics{different-ellipses}} ? Overfull \hbox (0.14923pt too wide) in paragraph at lines 752--755 []\OT1/cmtt/m/n/10 make-ellipse \OT1/cmr/m/it/10 center-point radius-1-dx radiu s-1-dy radius-2-dx radius-2-dy \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 start-ang le end- Overfull \hbox (4.28802pt too wide) in paragraph at lines 752--755 []\OT1/cmtt/m/n/10 make-ellipse* \OT1/cmr/m/it/10 center-x center-y radius-1-dx radius-1-dy radius-2-dx radius-2-dy \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 sta rt-angle [25] [26]) (./bboxes.tex [27] Chapter 4. LaTeX Warning: Reference `output-record-bbox' on page 28 undefined on input lin e 26. ! LaTeX Error: File `bounding-box' not found. See the LaTeX manual or LaTeX Companion for explanation. Type H <return> for immediate help. ... l.37 \centerline{\includegraphics{bounding-box}} ? [28] [29] LaTeX Warning: Reference `rect' on page 30 undefined on input line 139. [30]) (./transforms.tex [31] Chapter 5. [32] Overfull \hbox (25.27869pt too wide) in paragraph at lines 74--78 []\OT1/cmtt/m/n/10 make-translation-transformation \OT1/cmr/m/n/10 re-turns a t rans-for-ma-tion that trans-lates all points by \OT1/cmr/m/it/10 translation- Overfull \hbox (0.91237pt too wide) in paragraph at lines 87--92 []\OT1/cmtt/m/n/10 make-rotation-transformation \OT1/cmr/m/n/10 re-turns a tran s-for-ma-tion that ro-tates all points by \OT1/cmr/m/it/10 an-gle \OT1/cmr/m/n/ 10 (which [33] Overfull \hbox (2.13184pt too wide) in paragraph at lines 159--164 []\OT1/cmr/m/n/10 If the po-si-tions $(\OML/cmm/m/it/10 x\OT1/cmr/m/n/10 1\OML/ cmm/m/it/10 ; y\OT1/cmr/m/n/10 1)$, $(\OML/cmm/m/it/10 x\OT1/cmr/m/n/10 2\OML/c mm/m/it/10 ; y\OT1/cmr/m/n/10 2)$ and $(\OML/cmm/m/it/10 x\OT1/cmr/m/n/10 3\OML /cmm/m/it/10 ; y\OT1/cmr/m/n/10 3)$ are collinear, the \OT1/cmtt/m/n/10 transfo rmation-underspecified [34] [35] [36] Overfull \hbox (1.57776pt too wide) in paragraph at lines 288--293 []\OT1/cmr/m/n/10 If \OT1/cmr/m/it/10 trans-for-ma-tion \OT1/cmr/m/n/10 is sin- gu-lar, \OT1/cmtt/m/n/10 invert-transformation \OT1/cmr/m/n/10 will sig-nal the \OT1/cmtt/m/n/10 singular-transformation Overfull \hbox (18.61853pt too wide) in paragraph at lines 288--293 \OT1/cmr/m/n/10 er-ror, with a named restart that is in-voked with a trans-for- ma-tion and makes \OT1/cmtt/m/n/10 invert-transformation [37] [38]) [39] [40] (./silica.tex Chapter 6. LaTeX Warning: Reference `ports-and-grafts' on page 41 undefined on input line 53. [41] [42] [43] Chapter 7. [44] [45] Overfull \hbox (3.80618pt too wide) in paragraph at lines 252--256 []\OT1/cmr/m/n/10 If \OT1/cmr/m/it/10 new-ordering \OT1/cmr/m/n/10 does not con -tain all of the chil-dren of \OT1/cmr/m/it/10 sheet\OT1/cmr/m/n/10 , the \OT1/ cmtt/m/n/10 sheet-ordering-underspecified LaTeX Warning: Reference `ports-and-grafts' on page 46 undefined on input line 275. [46] [47] [48] [49] [50] [51] Chapter 8. [52] [53] [54] LaTeX Warning: Reference `event-hier' on page 55 undefined on input line 744. [55] [56] [57] Overfull \hbox (9.9512pt too wide) in paragraph at lines 862--864 []\OT1/cmr/m/n/10 All key-board event classes must im-ple-ment meth-ods for \OT 1/cmtt/m/n/10 keyboard-event-key-name \OT1/cmr/m/n/10 and \OT1/cmtt/m/n/10 keyb oard- [58] Overfull \hbox (12.14378pt too wide) in paragraph at lines 916--919 \OT1/cmr/m/n/10 will be one of \OT1/cmtt/m/n/10 +pointer-left-button+\OT1/cmr/m /n/10 , \OT1/cmtt/m/n/10 +pointer-middle-button+\OT1/cmr/m/n/10 , or \OT1/cmtt/ m/n/10 +pointer-right-button+\OT1/cmr/m/n/10 . [59] [60] [61] LaTeX Warning: Reference `drawing-options' on page 62 undefined on input line 1 096. LaTeX Warning: Reference `drawing-options' on page 62 undefined on input line 1 103. LaTeX Warning: Reference `drawing-options' on page 62 undefined on input line 1 111. LaTeX Warning: Reference `drawing-options' on page 62 undefined on input line 1 120. [62] LaTeX Warning: Reference `drawing-options' on page 63 undefined on input line 1 159. LaTeX Warning: Reference `line-styles' on page 63 undefined on input line 1160. LaTeX Warning: Reference `drawing-options' on page 63 undefined on input line 1 168. LaTeX Warning: Reference `drawing-options' on page 63 undefined on input line 1 176. LaTeX Warning: Reference `graphics-protocols' on page 63 undefined on input lin e 1198. [63] [64] [65] [66] [67] [68] Chapter 9. [69] Overfull \hbox (31.99362pt too wide) in paragraph at lines 1486--1486 []\OT1/cmtt/m/n/10 find-port &rest\OT1/cmr/m/it/10 initargs \OT1/cmtt/m/n/10 &k ey \OT1/cmr/m/it/10 (server-path \OT1/cmtt/m/it/10 *default-server-path*\OT1/cm r/m/it/10 ) \OT1/cmtt/m/n/10 &allow-other-keys [][] [70] [71] Overfull \hbox (51.79277pt too wide) in paragraph at lines 1626--1626 []\OT1/cmtt/m/n/10 find-graft &key \OT1/cmr/m/it/10 (server-path \OT1/cmtt/m/it /10 *default-server-path*\OT1/cmr/m/it/10 ) (port \OT1/cmtt/m/it/10 (find-port :server-path server-path)\OT1/cmr/m/it/10 ) [72] [73] [74] [75]) [76] [77] (./drawing-options.tex Chapter 10. LaTeX Warning: Reference `color' on page 78 undefined on input line 44. [78] LaTeX Warning: Reference `color' on page 79 undefined on input line 72. LaTeX Warning: Reference `transforms' on page 79 undefined on input line 88. [79] LaTeX Warning: Reference `line-styles' on page 80 undefined on input line 119. LaTeX Warning: Reference `text-styles' on page 80 undefined on input line 140. LaTeX Warning: Reference `text-styles' on page 80 undefined on input line 161. [80] Overfull \hbox (3.61745pt too wide) in paragraph at lines 196--200 []\OT1/cmtt/m/n/10 with-drawing-options \OT1/cmr/m/n/10 must be im-ple-mented b y ex-pand-ing into a call to \OT1/cmtt/m/n/10 invoke-with-drawing- Overfull \hbox (8.19685pt too wide) in paragraph at lines 201--201 []\OT1/cmtt/m/n/10 invoke-with-drawing-options \OT1/cmr/m/it/10 medium con-tin- u-a-tion \OT1/cmtt/m/n/10 &rest\OT1/cmr/m/it/10 drawing-options [][] LaTeX Warning: Reference `color' on page 81 undefined on input line 224. [81] LaTeX Warning: Reference `transforms' on page 82 undefined on input line 236. Overfull \hbox (31.99527pt too wide) in paragraph at lines 239--242 []\OT1/cmr/m/n/10 The \OT1/cmtt/m/n/10 :transformation \OT1/cmr/m/it/10 xform \ OT1/cmr/m/n/10 draw-ing op-tion tem-porar-ily changes the value of\OT1/cmtt/m/n /10 (medium-transformation Overfull \hbox (14.20093pt too wide) in paragraph at lines 255--262 []\OT1/cmr/m/n/10 The \OT1/cmtt/m/n/10 :clipping-region \OT1/cmr/m/it/10 re-gio n \OT1/cmr/m/n/10 draw-ing op-tion tem-porar-ily changes the value of \OT1/cmtt /m/n/10 (medium-clipping- Overfull \hbox (36.78746pt too wide) in paragraph at lines 255--262 \OT1/cmtt/m/n/10 region \OT1/cmr/m/it/10 medium\OT1/cmtt/m/n/10 ) \OT1/cmr/m/n/ 10 to \OT1/cmtt/m/n/10 (region-intersection (transform-region (medium-transform ation \OT1/cmr/m/it/10 medium\OT1/cmtt/m/n/10 ) LaTeX Warning: Reference `line-styles' on page 82 undefined on input line 271. LaTeX Warning: Reference `text-styles' on page 82 undefined on input line 290. [82] [83] [84] LaTeX Warning: Reference `line-style-options' on page 85 undefined on input lin e 434. [85] ! LaTeX Error: File `line-joint-shapes' not found. See the LaTeX manual or LaTeX Companion for explanation. Type H <return> for immediate help. ... l.494 ...line{\includegraphics{line-joint-shapes}} ? ! LaTeX Error: File `line-cap-shapes' not found. See the LaTeX manual or LaTeX Companion for explanation. Type H <return> for immediate help. ... l.509 ...erline{\includegraphics{line-cap-shapes}} ? [86]) (./text-styles.tex [87] Chapter 11. [88] Overfull \hbox (11.14412pt too wide) in paragraph at lines 57--61 \OT1/cmtt/m/n/10 :tiny\OT1/cmr/m/n/10 , \OT1/cmtt/m/n/10 :very-small\OT1/cmr/m/ n/10 , \OT1/cmtt/m/n/10 :small\OT1/cmr/m/n/10 , \OT1/cmtt/m/n/10 :large\OT1/cmr /m/n/10 , \OT1/cmtt/m/n/10 :very-large\OT1/cmr/m/n/10 , \OT1/cmtt/m/n/10 :huge\ OT1/cmr/m/n/10 ), a rel-a-tive size (\OT1/cmtt/m/n/10 :smaller \OT1/cmr/m/n/10 or \OT1/cmtt/m/n/10 :larger\OT1/cmr/m/n/10 ), [89] [90] [91] Overfull \hbox (12.85776pt too wide) in paragraph at lines 278--278 []\OT1/cmtt/m/n/10 (setf text-style-mapping) \OT1/cmr/m/it/10 map-ping port tex t-style \OT1/cmtt/m/n/10 &optional\OT1/cmr/m/it/10 character-set [][] [92]) (./graphics.tex [93] Chapter 12. LaTeX Warning: Reference `output-recording' on page 94 undefined on input line 39. [94] [95] LaTeX Warning: Reference `drawing-options' on page 96 undefined on input line 1 22. [96] LaTeX Warning: Reference `two-triangles' on page 97 undefined on input line 226 . [97] ! LaTeX Error: File `two-triangles' not found. See the LaTeX manual or LaTeX Companion for explanation. Type H <return> for immediate help. ... l.234 \centerline{\includegraphics{two-triangles}} ? LaTeX Warning: Reference `corner-circle' on page 98 undefined on input line 242 . ! LaTeX Error: File `corner-circle' not found. See the LaTeX manual or LaTeX Companion for explanation. Type H <return> for immediate help. ... l.250 \centerline{\includegraphics{corner-circle}} ? LaTeX Warning: Reference `inscribed-circle' on page 98 undefined on input line 257. ! LaTeX Error: File `inscribed-circle' not found. See the LaTeX manual or LaTeX Companion for explanation. Type H <return> for immediate help. ... l.268 ...rline{\includegraphics{inscribed-circle}} ? LaTeX Warning: Reference `correct-circle' on page 98 undefined on input line 27 4. ! LaTeX Error: File `correct-circle' not found. See the LaTeX manual or LaTeX Companion for explanation. Type H <return> for immediate help. ... l.278 ...terline{\includegraphics{correct-circle}} ? LaTeX Warning: Reference `thin-lines' on page 98 undefined on input line 299. [98] ! LaTeX Error: File `thin-lines' not found. See the LaTeX manual or LaTeX Companion for explanation. Type H <return> for immediate help. ... l.304 \centerline{\includegraphics{thin-lines}} ? LaTeX Warning: Reference `thick-lines' on page 99 undefined on input line 312. ! LaTeX Error: File `thick-lines' not found. See the LaTeX manual or LaTeX Companion for explanation. Type H <return> for immediate help. ... l.315 \centerline{\includegraphics{thick-lines}} ? LaTeX Warning: Reference `horizontal-lines' on page 99 undefined on input line 323. ! LaTeX Error: File `horizontal-lines' not found. See the LaTeX manual or LaTeX Companion for explanation. Type H <return> for immediate help. ... l.329 ...rline{\includegraphics{horizontal-lines}} ? LaTeX Warning: Reference `drawing-options' on page 99 undefined on input line 3 48. LaTeX Warning: Reference `spread-vs-point' on page 99 undefined on input line 3 65. [99] LaTeX Warning: Reference `extended-output' on page 100 undefined on input line 369. LaTeX Warning: Reference `drawing-options' on page 100 undefined on input line 390. Overfull \hbox (12.2103pt too wide) in paragraph at lines 394--395 []\OT1/cmtt/m/n/10 draw-points* \OT1/cmr/m/it/10 medium position-seq \OT1/cmtt/ m/n/10 &key \OT1/cmr/m/it/10 ink clipping-region trans-for-ma-tion line-style l ine-thickness [100] Overfull \hbox (2.33821pt too wide) in paragraph at lines 416--417 []\OT1/cmtt/m/n/10 draw-line \OT1/cmr/m/it/10 medium point1 point2 \OT1/cmtt/m/ n/10 &key \OT1/cmr/m/it/10 ink clipping-region trans-for-ma-tion line-style lin e-thickness LaTeX Warning: Reference `drawing-options' on page 101 undefined on input line 423. Overfull \hbox (6.96034pt too wide) in paragraph at lines 428--429 []\OT1/cmtt/m/n/10 draw-lines* \OT1/cmr/m/it/10 medium position-seq \OT1/cmtt/m /n/10 &key \OT1/cmr/m/it/10 ink clipping-region trans-for-ma-tion line-style li ne-thickness LaTeX Warning: Reference `drawing-options' on page 101 undefined on input line 461. [101] LaTeX Warning: Reference `drawing-options' on page 102 undefined on input line 487. Overfull \hbox (3.42702pt too wide) in paragraph at lines 492--493 []\OT1/cmtt/m/n/10 draw-rectangles \OT1/cmr/m/it/10 medium points \OT1/cmtt/m/n /10 &key \OT1/cmr/m/it/10 ink clipping-region trans-for-ma-tion line-style line -thickness Overfull \hbox (7.9763pt too wide) in paragraph at lines 512--512 [] \OT1/cmtt/m/n/10 (elt position-seq (+ i 2)) (elt po sition-seq (+ i 3))))[] LaTeX Warning: Reference `regions' on page 102 undefined on input line 530. [102] LaTeX Warning: Reference `drawing-options' on page 103 undefined on input line 549. [103] Overfull \hbox (14.74365pt too wide) in paragraph at lines 628--630 []\OT1/cmtt/m/n/10 draw-arrow \OT1/cmr/m/it/10 medium point-1 point-2 \OT1/cmtt /m/n/10 &key \OT1/cmr/m/it/10 ink clipping-region trans-for-ma-tion line-style line-thickness Overfull \hbox (3.71599pt too wide) in paragraph at lines 628--630 []\OT1/cmtt/m/n/10 draw-arrow* \OT1/cmr/m/it/10 medium x1 y1 x2 y2 \OT1/cmtt/m/ n/10 &key \OT1/cmr/m/it/10 ink clipping-region trans-for-ma-tion line-style lin e-thickness LaTeX Warning: Reference `drawing-options' on page 104 undefined on input line 641. [104] Overfull \hbox (17.8943pt too wide) in paragraph at lines 724--724 []\OT1/cmtt/m/n/10 copy-from-pixmap \OT1/cmr/m/it/10 pixmap pixmap-x pixmap-y w idth height medium medium-x medium-y [][] [105] Overfull \hbox (27.8134pt too wide) in paragraph at lines 751--751 []\OT1/cmtt/m/n/10 medium-copy-area \OT1/cmr/m/it/10 from-drawable from-x from- y width height to-drawable to-x to-y [][] [106] [107] [108]) (./colors.tex [109] Chapter 13. LaTeX Warning: Reference `designs' on page 110 undefined on input line 8. LaTeX Warning: Reference `graphics' on page 110 undefined on input line 24. LaTeX Warning: Reference `designs' on page 110 undefined on input line 36. LaTeX Warning: Reference `designs' on page 110 undefined on input line 41. [110] LaTeX Warning: Reference `designs' on page 111 undefined on input line 91. [111] LaTeX Warning: Reference `designs' on page 112 undefined on input line 115. [112] LaTeX Warning: Reference `color-names' on page 113 undefined on input line 204. [113] [114] LaTeX Warning: Reference `designs' on page 115 undefined on input line 317. [115] LaTeX Warning: Reference `designs' on page 116 undefined on input line 387. [116] [117]) (./designs.tex [118] Chapter 14. LaTeX Warning: Reference `color' on page 119 undefined on input line 6. [119] [120] [121] LaTeX Warning: Reference `design-classes' on page 122 undefined on input line 2 15. ! LaTeX Error: File `design-classes' not found. See the LaTeX manual or LaTeX Companion for explanation. Type H <return> for immediate help. ... l.219 ...terline{\includegraphics{design-classes}} ? Overfull \hbox (15.45149pt too wide) in paragraph at lines 226--230 []\OT1/cmr/m/n/10 Since bounded de-signs obey the re-gion pro-to-col, the func- tions \OT1/cmtt/m/n/10 transform-region \OT1/cmr/m/n/10 and \OT1/cmtt/m/n/10 un transform- [122] Overfull \hbox (57.34668pt too wide) in paragraph at lines 239--239 \OT1/cmr/m/it/10 line-unit line-dashes line-joint-shape line-cap-shape text-sty le text-family text-face text-size [][] LaTeX Warning: Reference `designs' on page 123 undefined on input line 260. [123] Overfull \hbox (6.41191pt too wide) in paragraph at lines 323--328 \OT1/cmtt/m/n/10 (make-opacity 0.1))\OT1/cmr/m/n/10 , or \OT1/cmtt/m/n/10 :ink (compose-in +foreground-ink+ (make-opacity 0.75))\OT1/cmr/m/n/10 . The Overfull \hbox (34.85037pt too wide) in paragraph at lines 341--344 []\OT1/cmr/bx/n/10 Drawing a ``bitmap''.[] \OT1/cmr/m/n/10 Use \OT1/cmtt/m/n/1 0 (draw-design \OT1/cmr/m/it/10 medium \OT1/cmtt/m/n/10 (make-pattern \OT1/cmr/ m/it/10 bit\OT1/cmtt/m/n/10 -\OT1/cmr/m/it/10 array \OT1/cmtt/m/n/10 (list +bac kground- ) [124] [125] [126] (./extended-output.tex Chapter 15. LaTeX Warning: Reference `gray-streams' on page 127 undefined on input line 17. [127] [128] LaTeX Warning: Reference `pane-init' on page 129 undefined on input line 112. [129] [130] [131] [132] [133] [134] [135] [136]) (./output-recording.tex [137] Chapter 16. [138] Overfull \hbox (20.56004pt too wide) in paragraph at lines 72--72 \OT1/cmr/m/sl/10 and \OT1/cmtt/m/sl/10 output-record-children\OT1/cmr/m/sl/10 , \OT1/cmtt/m/sl/10 sheet-adopt-child \OT1/cmr/m/sl/10 and \OT1/cmtt/m/sl/10 add -output-record\OT1/cmr/m/sl/10 , \OT1/cmtt/m/sl/10 sheet-disown-child [139] [140] [141] [142] [143] [144] Overfull \hbox (67.20131pt too wide) in paragraph at lines 452--456 \OT1/cmr/m/n/10 be-haves like a graph-ics dis-played out-put record, it should be a sub-class of \OT1/cmtt/m/n/10 graphics-displayed-output-record\OT1/cmr/m/n /10 . [145] [146] [147] [148] LaTeX Warning: Reference `drawing-functions' on page 149 undefined on input lin e 676. LaTeX Warning: Reference `graphics-protocols' on page 149 undefined on input li ne 677. [149] [150] Overfull \hbox (21.12437pt too wide) in paragraph at lines 753--753 []\OT1/cmtt/m/n/10 stream-add-character-output \OT1/cmr/m/it/10 stream char-ac- ter text-style width height base-line [][] Overfull \hbox (30.41882pt too wide) in paragraph at lines 766--766 []\OT1/cmtt/m/n/10 stream-add-string-output \OT1/cmr/m/it/10 stream string star t end text-style width height base-line [][] Overfull \hbox (2.01888pt too wide) in paragraph at lines 799--799 []\OT1/cmtt/m/n/10 invoke-with-output-recording-options \OT1/cmr/m/it/10 stream con-tin-u-a-tion record draw [][] [151] Overfull \hbox (18.11887pt too wide) in paragraph at lines 818--818 []\OT1/cmtt/m/n/10 with-new-output-record \OT1/cmr/m/it/10 (stream \OT1/cmtt/m/ n/10 &optional\OT1/cmr/m/it/10 record-type record \OT1/cmtt/m/n/10 &rest\OT1/cm r/m/it/10 initargs) \OT1/cmtt/m/n/10 &body\OT1/cmr/m/it/10 body [][] Overfull \hbox (10.68759pt too wide) in paragraph at lines 870--870 []\OT1/cmtt/m/n/10 with-output-to-output-record \OT1/cmr/m/it/10 (stream \OT1/c mtt/m/n/10 &optional\OT1/cmr/m/it/10 record-type record \OT1/cmtt/m/n/10 &rest\ OT1/cmr/m/it/10 initargs) \OT1/cmtt/m/n/10 &body\OT1/cmr/m/it/10 body [152]) (./table-formatting.tex [153] Chapter 17. LaTeX Warning: Reference `table-example' on page 154 undefined on input line 15 . ! LaTeX Error: File `table-example' not found. See the LaTeX manual or LaTeX Companion for explanation. Type H <return> for immediate help. ... l.32 \centerline{\includegraphics{table-example}} ? [154] [155] Overfull \hbox (16.82687pt too wide) in paragraph at lines 122--122 []\OT1/cmtt/m/n/10 formatting-table \OT1/cmr/m/it/10 (\OT1/cmtt/m/n/10 &optiona l\OT1/cmr/m/it/10 stream \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 x-spacing y-spa cing multiple-columns multiple-columns- [156] Overfull \hbox (14.91887pt too wide) in paragraph at lines 201--201 []\OT1/cmtt/m/n/10 formatting-column \OT1/cmr/m/it/10 (\OT1/cmtt/m/n/10 &option al\OT1/cmr/m/it/10 stream \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 record-type \O T1/cmtt/m/n/10 &allow-other-keys\OT1/cmr/m/it/10 ) \OT1/cmtt/m/n/10 &body\OT1/c mr/m/it/10 body [][] [157] [158] [159] [160] [161] [162] [163]) (./graph-formatting.tex [164] Chapter 18. LaTeX Warning: Reference `graph-example' on page 165 undefined on input line 7. ! LaTeX Error: File `graph-example' not found. See the LaTeX manual or LaTeX Companion for explanation. Type H <return> for immediate help. ... l.34 \centerline{\includegraphics{graph-example}} ? Overfull \hbox (4.39363pt too wide) in paragraph at lines 48--48 \OT1/cmr/m/it/10 cutoff-depth merge-duplicates duplicate-key duplicate-test gen eration-separation within-generation- [165] [166] Overfull \hbox (7.563pt too wide) in paragraph at lines 142--144 \OT1/cmr/m/n/10 new class that be-haves like a graph out-put record, it should be a sub-class of \OT1/cmtt/m/n/10 graph-output-record\OT1/cmr/m/n/10 . [167] [168]) (./bordered-output.tex [169] Chapter 19. LaTeX Warning: Reference `border-example' on page 170 undefined on input line 9 . ! LaTeX Error: File `border-example' not found. See the LaTeX manual or LaTeX Companion for explanation. Type H <return> for immediate help. ... l.28 \centerline{\includegraphics{border-example}} ? Overfull \hbox (8.01566pt too wide) in paragraph at lines 36--36 []\OT1/cmtt/m/n/10 surrounding-output-with-border \OT1/cmr/m/it/10 (\OT1/cmtt/m /n/10 &optional\OT1/cmr/m/it/10 stream \OT1/cmtt/m/n/10 &rest\OT1/cmr/m/it/10 d rawing-options \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 shape (move- [170]) (./text-formatting.tex [171] Chapter 20. [172] Overfull \hbox (7.5045pt too wide) in paragraph at lines 69--69 []\OT1/cmtt/m/n/10 filling-output \OT1/cmr/m/it/10 (stream \OT1/cmtt/m/n/10 &ke y \OT1/cmr/m/it/10 fill-width break-characters after-line-break after-line-brea k-initially) ) (./redisplay.tex [173] Chapter 21. [174] [175] [176] LaTeX Warning: Reference `application-frames' on page 177 undefined on input li ne 176. Overfull \hbox (15.01012pt too wide) in paragraph at lines 188--188 []\OT1/cmtt/m/n/10 updating-output \OT1/cmr/m/it/10 (stream \OT1/cmtt/m/n/10 &r est\OT1/cmr/m/it/10 args \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 unique-id (id-t est #'\OT1/cmtt/m/it/10 eql\OT1/cmr/m/it/10 ) cache-value (cache-test #'\OT1/cm tt/m/it/10 eql\OT1/cmr/m/it/10 ) [177] Overfull \hbox (4.50243pt too wide) in paragraph at lines 278--284 []\OT1/cmtt/m/n/10 (redisplay-output-record \OT1/cmr/m/it/10 record stream\OT1/ cmtt/m/n/10 ) \OT1/cmr/m/n/10 causes the out-put of \OT1/cmr/m/it/10 record \OT 1/cmr/m/n/10 to be re-com-puted. CLIM [178] Overfull \hbox (1.08643pt too wide) in paragraph at lines 312--315 []\OT1/cmr/m/it/10 record \OT1/cmr/m/n/10 will usu-ally be an out-put record cr e-ated by \OT1/cmtt/m/n/10 updating-output\OT1/cmr/m/n/10 . If it is not, then \OT1/cmtt/m/n/10 redisplay- [179] [180] Overfull \hbox (13.06554pt too wide) in paragraph at lines 430--430 []\OT1/cmtt/m/n/10 note-output-record-child-changed \OT1/cmr/m/it/10 record chi ld mode old-position old-bounding-rectangle stream Overfull \hbox (60.19662pt too wide) in paragraph at lines 430--430 \OT1/cmtt/m/n/10 &optional\OT1/cmr/m/it/10 erases moves draws erase-overlapping move-overlapping \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 check-overlapping [][ ] Overfull \hbox (75.32953pt too wide) in paragraph at lines 451--451 []\OT1/cmtt/m/n/10 propagate-output-record-changes-p \OT1/cmr/m/it/10 record ch ild mode old-position old-bounding-rectangle [][] Overfull \hbox (25.76544pt too wide) in paragraph at lines 461--461 []\OT1/cmtt/m/n/10 propagate-output-record-changes \OT1/cmr/m/it/10 record chil d mode \OT1/cmtt/m/n/10 &optional\OT1/cmr/m/it/10 old-position old-bounding-rec tangle [181] Overfull \hbox (4.63802pt too wide) in paragraph at lines 528--528 []\OT1/cmtt/m/n/10 incremental-redisplay \OT1/cmr/m/it/10 stream po-si-tion era ses moves draws erase-overlapping move-overlapping ) [182] [183] (./extended-input.tex Chapter 22. LaTeX Warning: Reference `gray-streams' on page 184 undefined on input line 15. [184] [185] [186] Overfull \hbox (26.7598pt too wide) in paragraph at lines 167--167 []\OT1/cmtt/m/n/10 read-gesture &key \OT1/cmr/m/it/10 (stream \OT1/cmtt/m/it/10 *standard-input*\OT1/cmr/m/it/10 ) time-out peek-p (input-wait-test \OT1/cmtt/ m/it/10 *input-wait-test*\OT1/cmr/m/it/10 ) Overfull \hbox (72.9262pt too wide) in paragraph at lines 167--167 \OT1/cmr/m/it/10 (input-wait-handler \OT1/cmtt/m/it/10 *input-wait-handler*\OT1 /cmr/m/it/10 ) (pointer-button-press-handler \OT1/cmtt/m/it/10 *pointer-button- press-handler*\OT1/cmr/m/it/10 ) Overfull \hbox (1.48784pt too wide) in paragraph at lines 177--177 []\OT1/cmtt/m/n/10 stream-read-gesture \OT1/cmr/m/it/10 stream \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 time-out peek-p (input-wait-test \OT1/cmtt/m/it/10 *inpu t-wait-test*\OT1/cmr/m/it/10 ) (input- Overfull \hbox (42.77083pt too wide) in paragraph at lines 177--177 \OT1/cmr/m/it/10 wait-handler \OT1/cmtt/m/it/10 *input-wait-handler*\OT1/cmr/m/ it/10 ) (pointer-button-press-handler \OT1/cmtt/m/it/10 *pointer-button-press-h andler*\OT1/cmr/m/it/10 ) [187] [188] [189] Overfull \hbox (9.7436pt too wide) in paragraph at lines 379--384 []\OT1/cmr/m/n/10 When \OT1/cmr/m/it/10 type \OT1/cmr/m/n/10 is \OT1/cmtt/m/n/1 0 :pointer-button\OT1/cmr/m/n/10 , \OT1/cmtt/m/n/10 :pointer-button-press\OT1/c mr/m/n/10 , or \OT1/cmtt/m/n/10 :pointer-button-release\OT1/cmr/m/n/10 , \OT1/c mr/m/it/10 gesture- [190] [191] [192] Overfull \hbox (22.9157pt too wide) in paragraph at lines 559--559 []\OT1/cmtt/m/n/10 tracking-pointer \OT1/cmr/m/it/10 (sheet \OT1/cmtt/m/n/10 &k ey \OT1/cmr/m/it/10 pointer multiple-window trans-formp context-type high-light ) \OT1/cmtt/m/n/10 &body\OT1/cmr/m/it/10 body [193] LaTeX Warning: Reference `output-recording' on page 194 undefined on input line 606. Overfull \hbox (3.66449pt too wide) in paragraph at lines 601--607 \OT1/cmr/m/n/10 po-si-tioned over them. high-light de-faults to \OT1/cmr/m/sl/1 0 true \OT1/cmr/m/n/10 when any of the \OT1/cmtt/m/n/10 :presentation\OT1/cmr/m /n/10 , \OT1/cmtt/m/n/10 :presentation- [194] Overfull \hbox (3.3413pt too wide) in paragraph at lines 681--686 \OT1/cmr/m/n/10 clause will run only if the pointer is over an ap-pli-ca-ble pr e-sen-ta-tion, oth-er-wise the \OT1/cmtt/m/n/10 :pointer- Overfull \hbox (1.41563pt too wide) in paragraph at lines 696--696 []\OT1/cmtt/m/n/10 drag-output-record \OT1/cmr/m/it/10 stream output-record \OT 1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 re-paint erase feed-back finish-on-release multiple- [195] Overfull \hbox (2.73802pt too wide) in paragraph at lines 738--738 []\OT1/cmtt/m/n/10 dragging-output \OT1/cmr/m/it/10 (\OT1/cmtt/m/n/10 &optional \OT1/cmr/m/it/10 stream \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 re-paint finish- on-release multiple-window) \OT1/cmtt/m/n/10 &body\OT1/cmr/m/it/10 body ) (./presentation-types.tex [196] Chapter 23. [197] Overfull \hbox (23.88754pt too wide) in paragraph at lines 93--96 \OT1/cmr/m/n/10 The fol-low-ing func-tions com-prise the pre-sen-ta-tion pro-to -col. All classes that in-herit from \OT1/cmtt/m/n/10 presentation [198] [199] Overfull \hbox (35.98222pt too wide) in paragraph at lines 232--232 []\OT1/cmtt/m/n/10 define-presentation-type \OT1/cmr/m/it/10 name pa-ram-e-ters \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 op-tions inherit-from de-scrip-tion his -tory parameters- [200] [201] Overfull \hbox (17.94122pt too wide) in paragraph at lines 329--329 []\OT1/cmtt/m/n/10 define-presentation-type-abbreviation \OT1/cmr/m/it/10 name pa-ram-e-ters equivalent-type \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 op-tions [][] [202] Overfull \hbox (4.86548pt too wide) in paragraph at lines 376--379 []\OT1/cmtt/m/n/10 expand-presentation-type-abbreviation \OT1/cmr/m/n/10 is lik e \OT1/cmtt/m/n/10 expand-presentation-type-abbreviation- [203] Overfull \hbox (33.29881pt too wide) in paragraph at lines 425--425 []\OT1/cmtt/m/n/10 define-presentation-generic-function \OT1/cmr/m/it/10 generi c-function-name presentation-function-name lambda- Overfull \hbox (15.75432pt too wide) in paragraph at lines 475--480 \OT1/cmtt/m/n/10 describe-presentation-type\OT1/cmr/m/n/10 , \OT1/cmtt/m/n/10 p resentation-type-specifier-p\OT1/cmr/m/n/10 , and \OT1/cmtt/m/n/10 accept-prese nt-default Overfull \hbox (22.39125pt too wide) in paragraph at lines 483--483 []\OT1/cmtt/m/n/10 define-default-presentation-method \OT1/cmr/m/it/10 name qua l-i-fiers* specialized-lambda-list \OT1/cmtt/m/n/10 &body\OT1/cmr/m/it/10 body [][] [204] Overfull \hbox (16.03572pt too wide) in paragraph at lines 488--488 []\OT1/cmtt/m/n/10 funcall-presentation-generic-function \OT1/cmr/m/it/10 prese ntation-function-name \OT1/cmtt/m/n/10 &rest\OT1/cmr/m/it/10 arguments [][] Overfull \hbox (5.53581pt too wide) in paragraph at lines 508--508 []\OT1/cmtt/m/n/10 apply-presentation-generic-function \OT1/cmr/m/it/10 present ation-function-name \OT1/cmtt/m/n/10 &rest\OT1/cmr/m/it/10 arguments [][] [205] [206] Overfull \hbox (19.5613pt too wide) in paragraph at lines 663--667 []\OT1/cmr/bx/n/10 Implementation note: \OT1/cmr/m/n/10 the ac-tual ar-gu-ment list to the \OT1/cmtt/m/n/10 map-over-presentation-type-supertypes Overfull \hbox (3.88257pt too wide) in paragraph at lines 681--685 \OT1/cmr/m/it/10 (type-key pa-ram-e-ters op-tions type stream view de-fault def ault-supplied-p present-p query-identifier) [207] [208] Overfull \hbox (31.90428pt too wide) in paragraph at lines 776--776 []\OT1/cmtt/m/n/10 with-presentation-type-decoded \OT1/cmr/m/it/10 (name-var \O T1/cmtt/m/n/10 &optional\OT1/cmr/m/it/10 parameters-var options-var) type \OT1/ cmtt/m/n/10 &body\OT1/cmr/m/it/10 body [209] [210] Overfull \hbox (10.95164pt too wide) in paragraph at lines 908--914 []\OT1/cmr/m/n/10 Performs the de-fault ac-tions for \OT1/cmtt/m/n/10 describe- presentation-type\OT1/cmr/m/n/10 , no-tably plu-ral-iza-tion and prepend- Overfull \hbox (15.74828pt too wide) in paragraph at lines 908--914 \OT1/cmr/m/n/10 ing an in-def-i-nite ar-ti-cle if ap-pro-pri-ate. \OT1/cmr/m/it /10 de-scrip-tion \OT1/cmr/m/n/10 is a string or a sym-bol, typ-i-cally the \OT 1/cmtt/m/n/10 :description Overfull \hbox (21.10446pt too wide) in paragraph at lines 942--942 []\OT1/cmtt/m/n/10 with-output-as-presentation \OT1/cmr/m/it/10 (stream ob-ject type \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 mod-i-fier single-box allow-sensit ive-inferiors [211] [212] [213] Overfull \hbox (2.62675pt too wide) in paragraph at lines 1097--1097 []\OT1/cmtt/m/n/10 with-input-context \OT1/cmr/m/it/10 (type \OT1/cmtt/m/n/10 & key \OT1/cmr/m/it/10 over-ride) (\OT1/cmtt/m/n/10 &optional\OT1/cmr/m/it/10 obj ect-var type-var event-var options-var) Overfull \hbox (8.2271pt too wide) in paragraph at lines 1147--1147 \OT1/cmr/m/it/10 his-tory active-p prompt prompt-mode display-default query-ide ntifier activation-gestures additional- [214] Overfull \hbox (3.65259pt too wide) in paragraph at lines 1168--1168 \OT1/cmr/m/it/10 additional-activation-gestures delimiter-gestures additional-d elimiter-gestures [][] Overfull \hbox (8.2271pt too wide) in paragraph at lines 1193--1193 \OT1/cmr/m/it/10 his-tory active-p prompt prompt-mode display-default query-ide ntifier activation-gestures additional- LaTeX Warning: Reference `input-editing' on page 215 undefined on input line 12 06. [215] LaTeX Warning: Reference `input-editing' on page 216 undefined on input line 12 64. LaTeX Warning: Reference `input-editing' on page 216 undefined on input line 12 70. [216] Overfull \hbox (0.66026pt too wide) in paragraph at lines 1295--1295 []\OT1/cmtt/m/n/10 prompt-for-accept-1 \OT1/cmr/m/it/10 stream type \OT1/cmtt/m /n/10 &key \OT1/cmr/m/it/10 de-fault default-type display-default prompt prompt -mode [217] [218] LaTeX Warning: Reference `gesture-names' on page 219 undefined on input line 14 38. [219] Overfull \hbox (17.32138pt too wide) in paragraph at lines 1545--1545 \OT1/cmr/m/it/10 table \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 ges-ture tester d oc-u-men-ta-tion pointer-documentation menu pri-or-ity echo) ar-glist \OT1/cmtt /m/n/10 &body\OT1/cmr/m/it/10 body [220] Overfull \hbox (10.61703pt too wide) in paragraph at lines 1589--1592 []\OT1/cmr/m/n/10 The other ar-gu-ments to \OT1/cmtt/m/n/10 define-presentation -action \OT1/cmr/m/n/10 are the same as for \OT1/cmtt/m/n/10 define-presentatio n- [221] [222] Overfull \hbox (8.49352pt too wide) in paragraph at lines 1706--1706 []\OT1/cmtt/m/n/10 find-applicable-translators \OT1/cmr/m/it/10 pre-sen-ta-tion input-context frame win-dow x y \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 event m odifier- [223] [224] Overfull \hbox (29.22176pt too wide) in paragraph at lines 1820--1820 []\OT1/cmtt/m/n/10 call-presentation-menu \OT1/cmr/m/it/10 pre-sen-ta-tion inpu t-context frame win-dow x y \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 for-menu la- bel [][] Overfull \hbox (5.549pt too wide) in paragraph at lines 1841--1841 []\OT1/cmtt/m/n/10 find-innermost-applicable-presentation \OT1/cmr/m/it/10 inpu t-context win-dow x y \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 frame modifier-sta te [225] Overfull \hbox (23.01544pt too wide) in paragraph at lines 1879--1879 []\OT1/cmtt/m/n/10 highlight-applicable-presentation \OT1/cmr/m/it/10 frame str eam input-context \OT1/cmtt/m/n/10 &optional\OT1/cmr/m/it/10 prefer-pointer-win dow Overfull \hbox (26.61642pt too wide) in paragraph at lines 1894--1898 []\OT1/cmr/bx/n/10 Implementation note: \OT1/cmr/m/n/10 This will prob-a-bly us e \OT1/cmtt/m/n/10 frame-find-innermost-applicable-presentation- Overfull \hbox (9.86707pt too wide) in paragraph at lines 1894--1898 \OT1/cmtt/m/n/10 at-position \OT1/cmr/m/n/10 to lo-cate the in-ner-most pre-sen -ta-tion, and \OT1/cmtt/m/n/10 unhighlight-highlighted-presentation Overfull \hbox (16.10497pt too wide) in paragraph at lines 1900--1900 []\OT1/cmtt/m/n/10 set-highlighted-presentation \OT1/cmr/m/it/10 stream pre-sen -ta-tion \OT1/cmtt/m/n/10 &optional\OT1/cmr/m/it/10 prefer-pointer-window [][] Overfull \hbox (2.2661pt too wide) in paragraph at lines 1908--1908 []\OT1/cmtt/m/n/10 unhighlight-highlighted-presentation \OT1/cmr/m/it/10 stream \OT1/cmtt/m/n/10 &optional\OT1/cmr/m/it/10 prefer-pointer-window [][] Overfull \hbox (46.92099pt too wide) in paragraph at lines 1924--1929 []\OT1/cmr/bx/n/10 Implementation note: \OT1/cmtt/m/n/10 with-input-context \OT 1/cmr/m/n/10 uses \OT1/cmtt/m/n/10 frame-find-innermost-applicable-presentation - [226] Overfull \hbox (0.81233pt too wide) in paragraph at lines 1966--1972 []\OT1/cmr/m/n/10 When a sin-gle trans-la-tor is be-ing cho-sen (such as is don e by \OT1/cmtt/m/n/10 throw-highlighted-presentation\OT1/cmr/m/n/10 ), [227] [228] [229] [230] [231] [232]) (./input-editing.tex [233] Chapter 24. LaTeX Warning: Reference `encapsulating-streams' on page 234 undefined on input line 16. [234] [235] Overfull \hbox (0.21579pt too wide) in paragraph at lines 162--162 []\OT1/cmtt/m/n/10 with-input-editing \OT1/cmr/m/it/10 (\OT1/cmtt/m/n/10 &optio nal\OT1/cmr/m/it/10 stream \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 input-sensiti zer initial-contents class) \OT1/cmtt/m/n/10 &body\OT1/cmr/m/it/10 body [236] [237] [238] [239] [240] Overfull \hbox (4.31091pt too wide) in paragraph at lines 440--442 []\OT1/cmr/m/n/10 See also the \OT1/cmtt/m/n/10 :activation-gestures \OT1/cmr/m /n/10 and \OT1/cmtt/m/n/10 :additional-activation-gestures \OT1/cmr/m/n/10 op-t ions to \OT1/cmtt/m/n/10 accept\OT1/cmr/m/n/10 . [241] [242] [243] Overfull \hbox (7.63252pt too wide) in paragraph at lines 612--612 []\OT1/cmtt/m/n/10 complete-input \OT1/cmr/m/it/10 stream func-tion \OT1/cmtt/m /n/10 &key \OT1/cmr/m/it/10 partial-completers allow-any-input possibility-prin ter (help- [244] Overfull \hbox (14.03787pt too wide) in paragraph at lines 703--703 []\OT1/cmtt/m/n/10 completing-from-suggestions \OT1/cmr/m/it/10 (stream \OT1/cm tt/m/n/10 &key \OT1/cmr/m/it/10 partial-completers allow-any-input possibility- printer [245] Overfull \hbox (18.26613pt too wide) in paragraph at lines 733--733 []\OT1/cmtt/m/n/10 complete-from-generator \OT1/cmr/m/it/10 string func-tion de -lim-iters \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 (ac-tion \OT1/cmtt/m/it/10 :c omplete\OT1/cmr/m/it/10 ) pred-i-cate [][] [246]) (./menus.tex [247] Chapter 25. Overfull \hbox (31.67459pt too wide) in paragraph at lines 19--19 \OT1/cmr/m/it/10 spacing y-spacing row-wise cell-align-x cell-align-y scroll-ba rs pointer-documentation [][] Overfull \hbox (13.60611pt too wide) in paragraph at lines 27--31 []\OT1/cmtt/m/n/10 menu-choose \OT1/cmr/m/n/10 will call \OT1/cmtt/m/n/10 frame -manager-menu-choose \OT1/cmr/m/n/10 on the frame man-ager be-ing used by \OT1/ cmr/m/it/10 associated- Overfull \hbox (7.11575pt too wide) in paragraph at lines 39--39 []\OT1/cmtt/m/n/10 frame-manager-menu-choose \OT1/cmr/m/it/10 frame-manager ite ms \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 associated-window printer presentatio n- [248] [249] Overfull \hbox (14.54347pt too wide) in paragraph at lines 184--184 []\OT1/cmtt/m/n/10 menu-choose-from-drawer \OT1/cmr/m/it/10 menu presentation-t ype drawer \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 x-position y-position cache u nique- [250] [251]) (./dialogs.tex [252] Chapter 26. Overfull \hbox (9.45462pt too wide) in paragraph at lines 19--19 []\OT1/cmtt/m/n/10 accepting-values \OT1/cmr/m/it/10 (\OT1/cmtt/m/n/10 &optiona l\OT1/cmr/m/it/10 stream \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 own-window exit -boxes initially-select-query-identifier Overfull \hbox (7.11588pt too wide) in paragraph at lines 19--19 \OT1/cmr/m/it/10 modify-initial-query resynchronize-every-pass resize-frame ali gn-prompts la-bel scroll-bars x-position [253] [254] Overfull \hbox (4.1434pt too wide) in paragraph at lines 178--178 []\OT1/cmtt/m/n/10 accept-values-command-button \OT1/cmr/m/it/10 (\OT1/cmtt/m/n /10 &optional\OT1/cmr/m/it/10 stream \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 doc -u-men-ta-tion query-identifier cache- [255] Overfull \hbox (0.71016pt too wide) in paragraph at lines 194--194 []\OT1/cmtt/m/n/10 invoke-accept-values-command-button \OT1/cmr/m/it/10 stream con-tin-u-a-tion view prompt \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 doc-u-men-t a-tion ) [256] [257] (./commands.tex Chapter 27. [258] [259] [260] Overfull \hbox (2.86858pt too wide) in paragraph at lines 178--180 []\OT1/cmr/m/n/10 A ta-ble that as-so-ciates command-line names to com-mand nam es (used to sup-port command- [261] Overfull \hbox (16.11685pt too wide) in paragraph at lines 291--294 []\OT1/cmtt/m/n/10 command-table-error \OT1/cmr/m/n/10 and its sub-classes must han-dle the \OT1/cmtt/m/n/10 :format-string \OT1/cmr/m/n/10 and \OT1/cmtt/m/n/ 10 :format-arguments [262] Overfull \hbox (13.80507pt too wide) in paragraph at lines 355--355 []\OT1/cmtt/m/n/10 remove-command-from-command-table \OT1/cmr/m/it/10 command-n ame command-table \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 (er-rorp t) [][] [263] [264] Overfull \hbox (5.01999pt too wide) in paragraph at lines 435--437 []\OT1/cmr/m/n/10 Returns the command-line name for \OT1/cmr/m/it/10 command-na me \OT1/cmr/m/n/10 as it is in-stalled in \OT1/cmr/m/it/10 command-table\OT1/cm r/m/n/10 . \OT1/cmr/m/it/10 command- [265] Overfull \hbox (5.25441pt too wide) in paragraph at lines 498--501 []\OT1/cmtt/m/n/10 add-menu-item-to-command-table\OT1/cmr/m/n/10 , \OT1/cmtt/m/ n/10 remove-menu-item-from-command-table\OT1/cmr/m/n/10 , and \OT1/cmtt/m/n/10 find-menu- [266] [267] Overfull \hbox (18.70462pt too wide) in paragraph at lines 630--630 []\OT1/cmtt/m/n/10 display-command-table-menu \OT1/cmr/m/it/10 command-table st ream \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 max-width max-height n-rows n-colum ns Overfull \hbox (11.6045pt too wide) in paragraph at lines 645--645 []\OT1/cmtt/m/n/10 menu-choose-command-from-command-table \OT1/cmr/m/it/10 comm and-table \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 associated-window default-styl e [268] [269] LaTeX Warning: Reference `presentation-types' on page 270 undefined on input li ne 796. Overfull \hbox (4.1063pt too wide) in paragraph at lines 802--806 \OT1/cmtt/m/n/10 presentation-translator \OT1/cmr/m/n/10 or \OT1/cmtt/m/n/10 de fine-presentation-to-command-translator\OT1/cmr/m/n/10 . \OT1/cmr/m/it/10 comma nd-table [270] Overfull \hbox (5.75993pt too wide) in paragraph at lines 815--815 []\OT1/cmtt/m/n/10 remove-presentation-translator-from-command-table \OT1/cmr/m /it/10 command-table translator-name \OT1/cmtt/m/n/10 &key Overfull \hbox (13.87144pt too wide) in paragraph at lines 856--856 []\OT1/cmtt/m/n/10 read-command \OT1/cmr/m/it/10 command-table \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 (stream *standard-input*) command-parser command-unparse r [271] Overfull \hbox (37.05995pt too wide) in paragraph at lines 906--906 []\OT1/cmtt/m/n/10 read-command-using-keystrokes \OT1/cmr/m/it/10 command-table keystrokes \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 (stream *standard-input*) co mmand- Overfull \hbox (17.55977pt too wide) in paragraph at lines 937--937 []\OT1/cmtt/m/n/10 command-line-read-remaining-arguments-for-partial-command \O T1/cmr/m/it/10 command-table stream partial- [272] Overfull \hbox (16.95988pt too wide) in paragraph at lines 955--955 []\OT1/cmtt/m/n/10 menu-read-remaining-arguments-for-partial-command \OT1/cmr/m /it/10 command-table stream partial-command [273] [274]) (./frames.tex [275] Chapter 28. LaTeX Warning: Reference `panes' on page 276 undefined on input line 26. LaTeX Warning: Reference `gadgets' on page 276 undefined on input line 27. [276] [277] LaTeX Warning: Reference `frame-panes' on page 278 undefined on input line 158. LaTeX Warning: Reference `frame-panes' on page 278 undefined on input line 164. [278] LaTeX Warning: Reference `frame-panes' on page 279 undefined on input line 169. [279] [280] LaTeX Warning: Reference `panes' on page 281 undefined on input line 300. LaTeX Warning: Reference `gadgets' on page 281 undefined on input line 301. [281] LaTeX Warning: Reference `panes' on page 282 undefined on input line 356. LaTeX Warning: Reference `gadgets' on page 282 undefined on input line 356. [282] [283] [284] LaTeX Warning: Reference `layout-protocol' on page 285 undefined on input line 573. [285] [286] Overfull \hbox (31.61685pt too wide) in paragraph at lines 694--696 []\OT1/cmr/m/n/10 The de-fault method (on \OT1/cmtt/m/n/10 standard-application -frame\OT1/cmr/m/n/10 ) will sim-ply call \OT1/cmtt/m/n/10 find-innermost-appli cable- Overfull \hbox (23.14645pt too wide) in paragraph at lines 697--697 []\OT1/cmtt/m/n/10 frame-input-context-button-press-handler \OT1/cmr/m/it/10 fr ame stream button-press-event [][] Overfull \hbox (12.96558pt too wide) in paragraph at lines 714--714 []\OT1/cmtt/m/n/10 frame-document-highlighted-presentation \OT1/cmr/m/it/10 fra me pre-sen-ta-tion input-context win-dow x y stream [287] Overfull \hbox (1.92355pt too wide) in paragraph at lines 754--762 []\OT1/cmr/m/n/10 The de-fault high-light-ing func-tion for trans-la-tors de-fi ned by \OT1/cmtt/m/n/10 define-drag-and-drop-translator\OT1/cmr/m/n/10 , [288] [289] [290] [291] [292] [293] [294] [295]) (./panes.tex [296] Chapter 29. [297] [298] [299] [300] [301] [302] [303] Overfull \hbox (11.84697pt too wide) in paragraph at lines 413--415 []\OT1/cmtt/m/n/10 labelling \OT1/cmr/m/it/10 (\OT1/cmtt/m/n/10 &rest\OT1/cmr/m /it/10 options \OT1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 la-bel label-alignment \O T1/cmtt/m/n/10 &allow-other-keys\OT1/cmr/m/it/10 ) \OT1/cmtt/m/n/10 &body\OT1/c mr/m/it/10 contents [][] [304] [305] [306] Overfull \hbox (3.03453pt too wide) in paragraph at lines 628--632 []\OT1/cmr/m/n/10 This func-tion is au-to-mat-i-cally in-voked by \OT1/cmtt/m/n /10 change-space-requirements \OT1/cmr/m/n/10 in the cases that \OT1/cmtt/m/n/1 0 layout- [307] [308] [309] Overfull \hbox (5.81017pt too wide) in paragraph at lines 784--784 []\OT1/cmtt/m/n/10 make-clim-stream-pane &rest\OT1/cmr/m/it/10 options \OT1/cmt t/m/n/10 &key \OT1/cmr/m/it/10 type la-bel label-alignment scroll-bars bor-ders display- [310] LaTeX Warning: Reference `clim-pane-options' on page 311 undefined on input lin e 889. [311] [312] [313]) (./gadgets.tex [314] Chapter 30. [315] [316] [317] Overfull \hbox (23.72617pt too wide) in paragraph at lines 219--219 []\OT1/cmtt/m/n/10 (defmethod handle-event ((pane push-button-pane) (event poin ter-button-press-event))[] [318] Overfull \hbox (34.22607pt too wide) in paragraph at lines 219--219 []\OT1/cmtt/m/n/10 (defmethod handle-event ((pane push-button-pane) (event poin ter-button-release-event))[] [319] [320] [321] Overfull \hbox (1.83983pt too wide) in paragraph at lines 397--399 []\OT1/cmr/m/n/10 The de-fault method (on \OT1/cmtt/m/n/10 action-gadget\OT1/cm r/m/n/10 ) calls the func-tion stored in \OT1/cmtt/m/n/10 gadget-activate-callb ack [322] [323] [324] [325] [326] [327] [328] [329] [330] [331] [332]) [333] [334] (./glossary.tex Appendix A. Overfull \hbox (1.20755pt too wide) in paragraph at lines 37--38 []\OT1/cmr/m/it/10 n. \OT1/cmr/m/n/10 The \OT1/cmr/m/sl/10 de-sign \OT1/cmr/m/n /10 that is used when eras-ing, that is, draw-ing us-ing \OT1/cmtt/m/n/10 +back ground-ink+\OT1/cmr/m/n/10 . [335] [336] [337] [338] [339] [340]) (./clim-sys.tex [341] Appendix B. [342] [343] Overfull \hbox (5.22961pt too wide) in paragraph at lines 111--113 []\OT1/cmr/m/n/10 The value of \OT1/cmtt/m/n/10 *multiprocessing-p* \OT1/cmr/m/ n/10 is \OT1/cmtt/m/n/10 t \OT1/cmr/m/n/10 if the cur-rent Lisp en-vi-ron-ment sup-ports multi-processing, [344] [345] [346]) (./encapsulating-streams.tex [347] Appendix C. [348] LaTeX Warning: Reference `gray-streams' on page 349 undefined on input line 58. LaTeX Warning: Reference `sheet-properties' on page 349 undefined on input line 60. LaTeX Warning: Reference `sheet-protocols' on page 349 undefined on input line 61. LaTeX Warning: Reference `drawing-options' on page 349 undefined on input line 63. LaTeX Warning: Reference `text-styles' on page 349 undefined on input line 65. LaTeX Warning: Reference `graphics' on page 349 undefined on input line 67. LaTeX Warning: Reference `extended-output' on page 349 undefined on input line 70. LaTeX Warning: Reference `output-recording' on page 349 undefined on input line 73. LaTeX Warning: Reference `incremental-redisplay' on page 349 undefined on input line 76. LaTeX Warning: Reference `extended-input' on page 349 undefined on input line 7 9. LaTeX Warning: Reference `presentation-types' on page 349 undefined on input li ne 82. Overfull \hbox (14.86818pt too wide) in paragraph at lines 100--113 []\OT1/cmr/m/n/10 Suppose we im-ple-ment \OT1/cmtt/m/n/10 accepting-values \OT1 /cmr/m/n/10 by us-ing an en-cap-su-lat-ing stream class called \OT1/cmtt/m/n/10 accepting- [349] Overfull \hbox (11.3403pt too wide) in paragraph at lines 114--122 \OT1/cmr/m/n/10 object-oriented pro-gram-ming, CLIM im-ple-men-ta-tions may in- tro-duce a spe-cial vari-able, \OT1/cmtt/m/n/10 *original- ) (./gray-streams.tex [350] Appendix D. [351] Overfull \hbox (25.95108pt too wide) in paragraph at lines 66--68 []\OT1/cmr/m/n/10 Bidirectional streams can be formed by in-clud-ing both \OT1/ cmtt/m/n/10 fundamental-input-stream \OT1/cmr/m/n/10 and \OT1/cmtt/m/n/10 funda mental- [352] Overfull \hbox (8.28392pt too wide) in paragraph at lines 139--142 \OT1/cmr/m/n/10 A char-ac-ter in-put stream can be cre-ated by defin-ing a clas s that in-cludes \OT1/cmtt/m/n/10 fundamental-character- [353] [354] [355]) (./extensions.tex [356] Appendix E. [357] Overfull \hbox (0.14946pt too wide) in paragraph at lines 94--94 []\OT1/cmtt/m/n/10 make-pattern-from-bitmap-file \OT1/cmr/m/it/10 path-name \OT 1/cmtt/m/n/10 &key \OT1/cmr/m/it/10 type de-signs \OT1/cmtt/m/n/10 &allow-other -keys [][] ) (./changes.tex [358] Appendix F. Overfull \hbox (33.03223pt too wide) in paragraph at lines 32--36 \OT1/cmtt/m/n/10 standard-region-union\OT1/cmr/m/n/10 , \OT1/cmtt/m/n/10 standa rd-region-intersection\OT1/cmr/m/n/10 , and \OT1/cmtt/m/n/10 standard-region-di fference\OT1/cmr/m/n/10 , [359] Overfull \hbox (15.61612pt too wide) in paragraph at lines 53--59 []\OT1/cmr/m/n/10 The func-tions \OT1/cmtt/m/n/10 bounding-rectangle-left\OT1/c mr/m/n/10 , \OT1/cmtt/m/n/10 bounding-rectangle-top\OT1/cmr/m/n/10 , \OT1/cmtt/ m/n/10 bounding-rectangle- Overfull \hbox (19.7268pt too wide) in paragraph at lines 53--59 \OT1/cmtt/m/n/10 min-x\OT1/cmr/m/n/10 , \OT1/cmtt/m/n/10 bounding-rectangle-min -y\OT1/cmr/m/n/10 , \OT1/cmtt/m/n/10 bounding-rectangle-max-x\OT1/cmr/m/n/10 , and \OT1/cmtt/m/n/10 bounding-rectangle- Overfull \hbox (14.50458pt too wide) in paragraph at lines 77--85 []\OT1/cmtt/m/n/10 compose-scaling-transformation\OT1/cmr/m/n/10 , \OT1/cmtt/m/ n/10 compose-translation-transformation\OT1/cmr/m/n/10 , and \OT1/cmtt/m/n/10 c ompose- Overfull \hbox (3.61722pt too wide) in paragraph at lines 77--85 \OT1/cmtt/m/n/10 rotation-transformation \OT1/cmr/m/n/10 have been re-placed by the six func-tions \OT1/cmtt/m/n/10 compose-translation- Overfull \hbox (17.17102pt too wide) in paragraph at lines 77--85 \OT1/cmtt/m/n/10 with-transformation\OT1/cmr/m/n/10 , \OT1/cmtt/m/n/10 compose- scaling-with-transformation\OT1/cmr/m/n/10 , \OT1/cmtt/m/n/10 compose-rotation- with- Overfull \hbox (17.17102pt too wide) in paragraph at lines 77--85 \OT1/cmtt/m/n/10 transformation\OT1/cmr/m/n/10 , \OT1/cmtt/m/n/10 compose-trans formation-with-translation\OT1/cmr/m/n/10 , \OT1/cmtt/m/n/10 compose-transforma tion- [360] Overfull \hbox (19.08897pt too wide) in paragraph at lines 121--124 []\OT1/cmtt/m/n/10 +foreground+ \OT1/cmr/m/n/10 and \OT1/cmtt/m/n/10 +backgroun d+ \OT1/cmr/m/n/10 have been re-named to \OT1/cmtt/m/n/10 +foreground-ink+ \OT1 /cmr/m/n/10 and \OT1/cmtt/m/n/10 +background- Overfull \hbox (6.19986pt too wide) in paragraph at lines 134--138 []\OT1/cmtt/m/n/10 stream-cursor-position* \OT1/cmr/m/n/10 and \OT1/cmtt/m/n/10 stream-increment-cursor-position* \OT1/cmr/m/n/10 have been re-named Overfull \hbox (9.95027pt too wide) in paragraph at lines 139--142 []\OT1/cmr/m/n/10 The func-tion \OT1/cmtt/m/n/10 stream-set-cursor-position* \O T1/cmr/m/n/10 has been re-placed by \OT1/cmtt/m/n/10 (setf* stream-cursor- Overfull \hbox (4.0337pt too wide) in paragraph at lines 146--152 []\OT1/cmr/m/n/10 The macros \OT1/cmtt/m/n/10 with-end-of-line-action \OT1/cmr/ m/n/10 and \OT1/cmtt/m/n/10 with-end-of-page-action \OT1/cmr/m/n/10 have been c hanged Overfull \hbox (21.70044pt too wide) in paragraph at lines 158--162 \OT1/cmtt/m/n/10 output-record-element \OT1/cmr/m/n/10 have been re-placed by t he two classes \OT1/cmtt/m/n/10 output-record \OT1/cmr/m/n/10 and \OT1/cmtt/m/n /10 displayed- Overfull \hbox (9.95027pt too wide) in paragraph at lines 166--169 []\OT1/cmr/m/n/10 The func-tion \OT1/cmtt/m/n/10 output-record-set-position* \O T1/cmr/m/n/10 has been re-placed by \OT1/cmtt/m/n/10 (setf* output-record- Overfull \hbox (2.67177pt too wide) in paragraph at lines 170--176 []\OT1/cmr/m/n/10 The func-tions \OT1/cmtt/m/n/10 output-record-start-position* \OT1/cmr/m/n/10 , \OT1/cmtt/m/n/10 output-record-set-start-position*\OT1/cmr/m/ n/10 , Overfull \hbox (0.25528pt too wide) in paragraph at lines 170--176 \OT1/cmtt/m/n/10 output-record-end-position*\OT1/cmr/m/n/10 , \OT1/cmtt/m/n/10 output-record-set-end-position* \OT1/cmr/m/n/10 have been re-placed Overfull \hbox (38.14316pt too wide) in paragraph at lines 170--176 \OT1/cmr/m/n/10 by \OT1/cmtt/m/n/10 output-record-start-cursor-position\OT1/cmr /m/n/10 , \OT1/cmtt/m/n/10 (setf* output-record-start-cursor-position)\OT1/cmr/ m/n/10 , Overfull \hbox (1.44888pt too wide) in paragraph at lines 170--176 \OT1/cmtt/m/n/10 output-record-end-cursor-position\OT1/cmr/m/n/10 , \OT1/cmtt/m /n/10 (setf* output-record-end-cursor-position) [361] Overfull \hbox (19.5332pt too wide) in paragraph at lines 179--183 []\OT1/cmtt/m/n/10 output-record-elements \OT1/cmr/m/n/10 and \OT1/cmtt/m/n/10 output-record-element-count \OT1/cmr/m/n/10 have been re-named to \OT1/cmtt/m/n /10 output- Overfull \hbox (6.28233pt too wide) in paragraph at lines 188--193 []\OT1/cmtt/m/n/10 map-over-output-record-elements-containing-point* \OT1/cmr/m /n/10 and \OT1/cmtt/m/n/10 map-over-output-record- Overfull \hbox (30.47734pt too wide) in paragraph at lines 188--193 \OT1/cmtt/m/n/10 elements-overlapping-region \OT1/cmr/m/n/10 have been re-named to \OT1/cmtt/m/n/10 map-over-output-records-containing- Overfull \hbox (0.19102pt too wide) in paragraph at lines 188--193 \OT1/cmtt/m/n/10 position \OT1/cmr/m/n/10 and \OT1/cmtt/m/n/10 map-over-output- records-overlapping-region\OT1/cmr/m/n/10 . Com-pat-i-bil-ity func-tions Overfull \hbox (0.9499pt too wide) in paragraph at lines 194--197 []\OT1/cmtt/m/n/10 linear-output-record \OT1/cmr/m/n/10 and \OT1/cmtt/m/n/10 co ordinate-sorted-set-output-record \OT1/cmr/m/n/10 have been re-named Overfull \hbox (11.94879pt too wide) in paragraph at lines 202--207 []\OT1/cmtt/m/n/10 output-recording-stream-output-record\OT1/cmr/m/n/10 , \OT1/ cmtt/m/n/10 output-recording-stream-current-output- Overfull \hbox (4.61589pt too wide) in paragraph at lines 202--207 \OT1/cmr/m/n/10 to \OT1/cmtt/m/n/10 stream-output-history\OT1/cmr/m/n/10 , \OT1 /cmtt/m/n/10 stream-current-output-record\OT1/cmr/m/n/10 , and \OT1/cmtt/m/n/10 stream-text-output- Overfull \hbox (1.03238pt too wide) in paragraph at lines 216--220 []\OT1/cmtt/m/n/10 add-string-output-to-output-record \OT1/cmr/m/n/10 and \OT1/ cmtt/m/n/10 add-character-output-to-output-record [362] Overfull \hbox (13.1435pt too wide) in paragraph at lines 303--309 []\OT1/cmr/m/n/10 The \OT1/cmtt/m/n/10 :activation-characters\OT1/cmr/m/n/10 , \OT1/cmtt/m/n/10 :additional-activation-characters\OT1/cmr/m/n/10 , \OT1/cmtt/m /n/10 :blip-characters\OT1/cmr/m/n/10 , Overfull \hbox (16.75511pt too wide) in paragraph at lines 303--309 \OT1/cmr/m/n/10 been re-named to \OT1/cmtt/m/n/10 :activation-gestures\OT1/cmr/ m/n/10 , \OT1/cmtt/m/n/10 :additional-activation-gestures\OT1/cmr/m/n/10 , \OT1 /cmtt/m/n/10 :delimiter- [363] Overfull \hbox (16.4777pt too wide) in paragraph at lines 321--326 []\OT1/cmr/m/n/10 The \OT1/cmtt/m/n/10 :shift-mask \OT1/cmr/m/n/10 key-word ar- gu-ment to \OT1/cmtt/m/n/10 test-presentation-translator\OT1/cmr/m/n/10 , \OT1/ cmtt/m/n/10 find-applicable- Overfull \hbox (4.00467pt too wide) in paragraph at lines 321--326 \OT1/cmtt/m/n/10 translators\OT1/cmr/m/n/10 , \OT1/cmtt/m/n/10 presentation-mat ches-context-type\OT1/cmr/m/n/10 , and \OT1/cmtt/m/n/10 find-innermost-applicab le- Overfull \hbox (19.08897pt too wide) in paragraph at lines 331--336 []\OT1/cmtt/m/n/10 dialog-view \OT1/cmr/m/n/10 and \OT1/cmtt/m/n/10 +dialog-vie w+ \OT1/cmr/m/n/10 have been re-named to \OT1/cmtt/m/n/10 textual-dialog-view \ OT1/cmr/m/n/10 and \OT1/cmtt/m/n/10 +textual- Overfull \hbox (3.02441pt too wide) in paragraph at lines 331--336 \OT1/cmtt/m/n/10 +menu-view+ \OT1/cmr/m/n/10 have been re-named to \OT1/cmtt/m/ n/10 textual-menu-view \OT1/cmr/m/n/10 and \OT1/cmtt/m/n/10 +textual-menu-view+ \OT1/cmr/m/n/10 . Com- Overfull \hbox (46.19858pt too wide) in paragraph at lines 342--349 []\OT1/cmtt/m/n/10 *activation-characters*\OT1/cmr/m/n/10 , \OT1/cmtt/m/n/10 *s tandard-activation-characters*\OT1/cmr/m/n/10 , \OT1/cmtt/m/n/10 with-activatio n-characters\OT1/cmr/m/n/10 , Overfull \hbox (6.78336pt too wide) in paragraph at lines 342--349 \OT1/cmr/m/n/10 and \OT1/cmtt/m/n/10 activation-character-p \OT1/cmr/m/n/10 hav e been re-named to \OT1/cmtt/m/n/10 *activation-gestures*\OT1/cmr/m/n/10 , \OT1 /cmtt/m/n/10 *standard- Overfull \hbox (3.24574pt too wide) in paragraph at lines 342--349 \OT1/cmtt/m/n/10 activation-gestures*\OT1/cmr/m/n/10 , \OT1/cmtt/m/n/10 with-ac tivation-gestures\OT1/cmr/m/n/10 , and \OT1/cmtt/m/n/10 activation-gesture-p\OT 1/cmr/m/n/10 . Com- Overfull \hbox (23.47824pt too wide) in paragraph at lines 342--349 \OT1/cmr/m/n/10 pat-i-bil-ity func-tions will re-main for \OT1/cmtt/m/n/10 with -activation-characters \OT1/cmr/m/n/10 and \OT1/cmtt/m/n/10 activation-characte r- Overfull \hbox (3.85696pt too wide) in paragraph at lines 350--356 \OT1/cmr/m/n/10 to \OT1/cmtt/m/n/10 *delimiter-gestures*\OT1/cmr/m/n/10 , \OT1/ cmtt/m/n/10 with-delimiter-gestures\OT1/cmr/m/n/10 , and \OT1/cmtt/m/n/10 delim iter-gesture-p\OT1/cmr/m/n/10 . Com- Overfull \hbox (4.94933pt too wide) in paragraph at lines 359--362 []\OT1/cmtt/m/n/10 *completion-characters*\OT1/cmr/m/n/10 , \OT1/cmtt/m/n/10 *h elp-characters*\OT1/cmr/m/n/10 , and \OT1/cmtt/m/n/10 *possibilities-characters * \OT1/cmr/m/n/10 have Overfull \hbox (27.36636pt too wide) in paragraph at lines 359--362 \OT1/cmr/m/n/10 been re-named to \OT1/cmtt/m/n/10 *completion-gestures*\OT1/cmr /m/n/10 , \OT1/cmtt/m/n/10 *help-gestures*\OT1/cmr/m/n/10 , and \OT1/cmtt/m/n/1 0 *possibilities-gestures*\OT1/cmr/m/n/10 . Overfull \hbox (19.5329pt too wide) in paragraph at lines 368--372 \OT1/cmr/m/n/10 been re-named to \OT1/cmtt/m/n/10 stream-input-buffer\OT1/cmr/m /n/10 , \OT1/cmtt/m/n/10 stream-scan-pointer\OT1/cmr/m/n/10 , \OT1/cmtt/m/n/10 stream-insertion-pointer\OT1/cmr/m/n/10 , [364] Overfull \hbox (12.86691pt too wide) in paragraph at lines 388--392 []\OT1/cmr/m/n/10 The vari-able \OT1/cmtt/m/n/10 *unsupplied-argument* \OT1/cmr /m/n/10 has been re-named to \OT1/cmtt/m/n/10 *unsupplied-argument-marker* Overfull \hbox (4.07895pt too wide) in paragraph at lines 398--404 \OT1/cmtt/m/n/10 to-command-table\OT1/cmr/m/n/10 , and \OT1/cmtt/m/n/10 remove- keystroke-from-command-table\OT1/cmr/m/n/10 . The \OT1/cmtt/m/n/10 :keystroke-t est Overfull \hbox (3.9785pt too wide) in paragraph at lines 410--412 []\OT1/cmr/m/n/10 The \OT1/cmtt/m/n/10 :root \OT1/cmr/m/n/10 ar-gu-ment has bee n re-moved from \OT1/cmtt/m/n/10 open-window-stream \OT1/cmr/m/n/10 and \OT1/cm tt/m/n/10 make-application- Overfull \hbox (17.94995pt too wide) in paragraph at lines 424--427 []\OT1/cmtt/m/n/10 command-enabled-p\OT1/cmr/m/n/10 , \OT1/cmtt/m/n/10 enable-c ommand\OT1/cmr/m/n/10 , and \OT1/cmtt/m/n/10 disable-command \OT1/cmr/m/n/10 ha ve been re-placed by \OT1/cmtt/m/n/10 command- [365]) [366] [367] No file clim.ind. (./clim.aux) Package rerunfilecheck Warning: File `clim.out' has changed. (rerunfilecheck) Rerun to get outlines right (rerunfilecheck) or use package `bookmark'. LaTeX Warning: There were undefined references. LaTeX Warning: Label(s) may have changed. Rerun to get cross-references right. )</usr/share/texlive/texmf-dist/fonts/type1/public/amsfonts/cm/cmbx10.pfb></us r/share/texlive/texmf-dist/fonts/type1/public/amsfonts/cm/cmbx12.pfb></usr/shar e/texlive/texmf-dist/fonts/type1/public/amsfonts/cm/cmitt10.pfb></usr/share/tex live/texmf-dist/fonts/type1/public/amsfonts/cm/cmmi10.pfb></usr/share/texlive/t exmf-dist/fonts/type1/public/amsfonts/cm/cmmi7.pfb></usr/share/texlive/texmf-di st/fonts/type1/public/amsfonts/cm/cmr10.pfb></usr/share/texlive/texmf-dist/font s/type1/public/amsfonts/cm/cmr12.pfb></usr/share/texlive/texmf-dist/fonts/type1 /public/amsfonts/cm/cmr17.pfb></usr/share/texlive/texmf-dist/fonts/type1/public /amsfonts/cm/cmr6.pfb></usr/share/texlive/texmf-dist/fonts/type1/public/amsfont s/cm/cmr7.pfb></usr/share/texlive/texmf-dist/fonts/type1/public/amsfonts/cm/cmr 8.pfb></usr/share/texlive/texmf-dist/fonts/type1/public/amsfonts/cm/cmsl10.pfb> </usr/share/texlive/texmf-dist/fonts/type1/public/amsfonts/cm/cmsltt10.pfb></us r/share/texlive/texmf-dist/fonts/type1/public/amsfonts/cm/cmsy10.pfb></usr/shar e/texlive/texmf-dist/fonts/type1/public/amsfonts/cm/cmsy7.pfb></usr/share/texli ve/texmf-dist/fonts/type1/public/amsfonts/cm/cmti10.pfb></usr/share/texlive/tex mf-dist/fonts/type1/public/amsfonts/cm/cmti12.pfb></usr/share/texlive/texmf-dis t/fonts/type1/public/amsfonts/cm/cmtt10.pfb></usr/share/texlive/texmf-dist/font s/type1/public/amsfonts/cm/cmtt12.pfb></usr/share/texlive/texmf-dist/fonts/type 1/public/amsfonts/latxfont/lcircle1.pfb></usr/share/texlive/texmf-dist/fonts/ty pe1/public/amsfonts/latxfont/line10.pfb> Output written on clim.pdf (370 pages, 1143519 bytes). Transcript written on clim.log. Makefile:12: recipe for target 'clim.pdf' failed make: *** [clim.pdf] Error 1 and how to get normal CLIM Specification document with cross reference and whatever whistle you implied. Very best, Igor

2 1

Re: how does code works
by Rainer Joswig 20 Nov '20

20 Nov '20

(with-slots (own-window-p) ; the slot and then conceptually a variable of the same name frame ; the object from which to use the slot own-window-p) ; the variable so (with-slots (own-window-p) frame (foo :bar own-window-p)) calls the function FOO and passes the value of OWN-WINDOW-P to the keyword arg BAR > Am 20.11.2020 um 23:33 schrieb igor denisov <saufesma(a)gmail.com>: > >> It's a good idea to check the documentation of the used CLIM functions and CLIM macros in a CLIM reference. > > You have no idea how hard I check on that but my understanding of the > hole is going really slow. And it is not so obvious to me. > >> It gets called with keyword arg :OW and its value is the value of the slot value of the application frame. > > This is slot value of the application frame? > ((own-window-p :initform nil)) > > if so, I do not understand how that value was passed to keyword arg :OW > Can you show me how it was passed? > > Whatever input I have to pass to app, I am being forced to use > accepting-values macro or there are some other options? > > I would really appreciate any code on input and output of any app. > More is better. > > Looking forward your reply. > > On 11/20/20, Rainer Joswig <joswig(a)lisp.de> wrote: >> The application frame has a slot OWN-WINDOW-P . This should control whether >> the reset clock UI uses its own dialog window for resetting the clock >> values. >> >> if one uses the command :RESET CLOCK 1, then the reset-clock-1 function gets >> called. >> It gets called with keyword arg :OW and its value is the value of the slot >> value of the application frame. >> >> Inside the function RESET-CLOCK-1 there is use of the macro >> CLIM:ACCEPTING-VALUES. >> The value of the variable OW is used as a value for the keyword option >> :OWN-WINDOW. >> At runtime this macro then will either >> >> :own-window nil -> create the UI for resetting the clock inline >> >> or >> >> :own-window t -> create a new window dialog for resetting the clock >> >> >> It's a good idea to check the documentation of the used CLIM functions and >> CLIM macros in a CLIM reference. >> >> >> >>> Am 20.11.2020 um 01:19 schrieb igor denisov <saufesma(a)gmail.com>: >>> >>> There are places marked with question marks where I do not understand >>> what is going on. Can you explain them? >>> >>> (in-package :common-lisp-user) >>> (defpackage :first-app >>> (:use :clim :clim-lisp) >>> (:export first-app)) >>> (in-package :first-app) >>> >>> (defun av-test-display-screen (frame pane) >>> (declare (ignore frame)) >>> (with-text-size (pane :large) >>> (fresh-line pane) >>> (present '(com-reset-clock-1) 'command :stream pane) >>> (fresh-line pane))) >>> >>> (define-application-frame av-test () >>> ((own-window-p :initform nil)) ;; These slots will typically hold >>> ;; any per-instance frame state. >>> >>> (:menu-bar t) >>> (:panes >>> (screen :application >>> :display-time t >>> :display-function #'av-test-display-screen >>> :text-style (make-text-style :sans-serif :roman :normal)) >>> (interactor :interactor :min-width 600) >>> (doc :pointer-documentation)) >>> (:layouts >>> (defaults >>> (vertically () >>> screen >>> interactor >>> doc)))) >>> >>> ;; default-frame-top-level will also establish a simple restart >>> ;; for abort, and bind the standard stream variables. *query-io* will be >>> bound >>> ;; to the value returned by frame-query-io >>> (defun reset-clock-1 (&key (stream *query-io*) (ow t)) >>> ;; ^^^ ^^^ ^ ^ >>> ;; keyword-name var k-n v >>> (multiple-value-bind (second minute hour day month) >>> (decode-universal-time (get-universal-time)) >>> (declare (ignore second)) ;; self explanatory, var second is not used >>> ;; anywhere >>> (restart-case >>> ;; restartable-form >>> (progn >>> ;; For instance, an accepting-values whose fields consist of >>> ;; gadgets may appear in an ordinary CLIM >>> ;; stream pane. >>> ;; For example, accepting-values dialogs can be implemented by >>> ;; using an encapsulating stream that tailors calls to accept >>> and >>> ;; prompt-for-accept in such a way that the output is captured and >>> ;; formatted into a dialog that contains prompts and fields >>> ;; that can be clicked on and modified by the user. >>> >>> ;; (For example, the behavior of accepting-values can be implemented >>> ;; by creating a special class of stream that turns calls to >>> ;; accept into fields of a dialog.) ????????????? HOW TO??? >>> >>> ;; accepting-values (&optional stream &key own-window exit-boxes >>> ;; initially-select-query-identifier modify-initial-query >>> ;; resynchronize-every-pass resize-frame align-prompts label >>> ;; scroll-bars x-position y-position width height command-table >>> ;; frame-class) &body body [Macro] >>> >>> (clim:accepting-values (stream :own-window ow) >>> ;; (accepting-values (stream :own-window ow) >>> ;; same as????? >>> ;; (accepting-values >>> ;; (&optional stream >>> ;; &key own-window >>> ;; what is ow) ?????????? >>> (format stream "Enter the time~%") >>> (setq month (clim:accept 'integer :stream stream >>> :default month :prompt "Month")) >>> (terpri stream) >>> (setq day (clim:accept 'integer :stream stream >>> :default day :prompt "Day")) >>> (terpri stream) >>> (setq hour (clim:accept 'integer :stream stream >>> :default hour :prompt "Hour")) >>> (terpri stream) >>> (setq minute (clim:accept 'integer :stream stream >>> :default minute :prompt "Minute"))) >>> ;; This could be code to reset the time, but instead >>> ;; we’re just printing it out >>> (format nil "New values: Month: ~D, Day: ~D, Time: ~D:~2,'0D." >>> month day hour minute)) >>> ;; case-name is abort, it names this restart. >>> (abort () (format nil "Time not set"))))) >>> >>> (define-av-test-command (com-reset-clock-1 :name t :menu nil) () >>> (with-slots (own-window-p) clim:*application-frame* >>> (format t "Result: ~S~%" (multiple-value-list >>> ;; (defun reset-clock-1 >>> ;; (&key (stream *query-io*) (ow t)) ...) >>> (reset-clock-1 :ow own-window-p)))) >>> (finish-output *standard-output*)) ;; ^ ^ >>> ;; | >>> av-test slot >>> ;; no idea??? >>> (defun first-app () >>> (run-frame-top-level (make-application-frame 'av-test))) >>> >>> Regards, >>> Igor. >> >> >>

1 0

how does code works
by igor denisov 20 Nov '20

20 Nov '20

There are places marked with question marks where I do not understand what is going on. Can you explain them? (in-package :common-lisp-user) (defpackage :first-app (:use :clim :clim-lisp) (:export first-app)) (in-package :first-app) (defun av-test-display-screen (frame pane) (declare (ignore frame)) (with-text-size (pane :large) (fresh-line pane) (present '(com-reset-clock-1) 'command :stream pane) (fresh-line pane))) (define-application-frame av-test () ((own-window-p :initform nil)) ;; These slots will typically hold ;; any per-instance frame state. (:menu-bar t) (:panes (screen :application :display-time t :display-function #'av-test-display-screen :text-style (make-text-style :sans-serif :roman :normal)) (interactor :interactor :min-width 600) (doc :pointer-documentation)) (:layouts (defaults (vertically () screen interactor doc)))) ;; default-frame-top-level will also establish a simple restart ;; for abort, and bind the standard stream variables. *query-io* will be bound ;; to the value returned by frame-query-io (defun reset-clock-1 (&key (stream *query-io*) (ow t)) ;; ^^^ ^^^ ^ ^ ;; keyword-name var k-n v (multiple-value-bind (second minute hour day month) (decode-universal-time (get-universal-time)) (declare (ignore second)) ;; self explanatory, var second is not used ;; anywhere (restart-case ;; restartable-form (progn ;; For instance, an accepting-values whose fields consist of ;; gadgets may appear in an ordinary CLIM ;; stream pane. ;; For example, accepting-values dialogs can be implemented by ;; using an encapsulating stream that tailors calls to accept and ;; prompt-for-accept in such a way that the output is captured and ;; formatted into a dialog that contains prompts and fields ;; that can be clicked on and modified by the user. ;; (For example, the behavior of accepting-values can be implemented ;; by creating a special class of stream that turns calls to ;; accept into fields of a dialog.) ????????????? HOW TO??? ;; accepting-values (&optional stream &key own-window exit-boxes ;; initially-select-query-identifier modify-initial-query ;; resynchronize-every-pass resize-frame align-prompts label ;; scroll-bars x-position y-position width height command-table ;; frame-class) &body body [Macro] (clim:accepting-values (stream :own-window ow) ;; (accepting-values (stream :own-window ow) ;; same as????? ;; (accepting-values ;; (&optional stream ;; &key own-window ;; what is ow) ?????????? (format stream "Enter the time~%") (setq month (clim:accept 'integer :stream stream :default month :prompt "Month")) (terpri stream) (setq day (clim:accept 'integer :stream stream :default day :prompt "Day")) (terpri stream) (setq hour (clim:accept 'integer :stream stream :default hour :prompt "Hour")) (terpri stream) (setq minute (clim:accept 'integer :stream stream :default minute :prompt "Minute"))) ;; This could be code to reset the time, but instead ;; we’re just printing it out (format nil "New values: Month: ~D, Day: ~D, Time: ~D:~2,'0D." month day hour minute)) ;; case-name is abort, it names this restart. (abort () (format nil "Time not set"))))) (define-av-test-command (com-reset-clock-1 :name t :menu nil) () (with-slots (own-window-p) clim:*application-frame* (format t "Result: ~S~%" (multiple-value-list ;; (defun reset-clock-1 ;; (&key (stream *query-io*) (ow t)) ...) (reset-clock-1 :ow own-window-p)))) (finish-output *standard-output*)) ;; ^ ^ ;; | av-test slot ;; no idea??? (defun first-app () (run-frame-top-level (make-application-frame 'av-test))) Regards, Igor.

2 1

demo application Clamber
by igor denisov 18 Nov '20

18 Nov '20

Hi there, I really like your project, I even read a book "Object-oriented programming in common lisp" by Sonya Keene to write some simple apps in McCLIM but unfortunately I cannot apply my humble CLOS knowledge to McCLIM as it is not clear to me how McCLIM is organized. And today I learned that you guys developed demo application Clamber. May I have it? Regards, Igor

2 1

how to understand big chanks of code
by igor denisov 12 Nov '20

12 Nov '20

Hi there, from mcclim examples (in-package :common-lisp-user) (defpackage :clim-demo.clim-fig (:use :clim-lisp :clim) (:import-from :alexandria :when-let :curry) (:export :clim-fig)) ; Function and application frame class (in-package :clim-demo.clim-fig) (defclass canvas-pane (application-pane);;If you want to create a new class ;;that behaves like an application ;;frame, it should be a subclass of ;;application-frame. ()) (defclass move-event () ((record :initarg :record :reader record) (delta-x :initarg :delta-x :reader delta-x :initform 0) (delta-y :initarg :delta-y :reader delta-y :initform 0)) (:default-initargs :record (error "move-event needs a record"))) ;;Appeared no where else (defmethod print-object ((object move-event) stream) (print-unreadable-object (object stream :type T) (format stream "moving ~a by (~D,~D)>" (record object) (delta-x object) (delta-y object)))) (defun set-status-line (string) (setf (clime:label-pane-label (find-pane-named *application-frame* 'status)) string)) ;;status is a slot in application frame, clime:label-pane-label becomes ;;slot status and string is new value (defun draw-figure (pane mode x y x1 y1 &key cp-x1 cp-y1 cp-x2 cp-y2) (with-slots (line-style current-color fill-mode constrict-mode) *application-frame* (let* ((radius-x (- x1 x)) (radius-y (- y1 y))) (when constrict-mode (case mode ((:line :arrow) (if (> (abs radius-x) (abs radius-y)) (setf y1 y) (setf x1 x))) ((:rectangle :ellipse) (let ((radius-max (max (abs radius-x) (abs radius-y)))) (setf radius-x (* (if (minusp radius-x) -1 1) radius-max) radius-y (* (if (minusp radius-y) -1 1) radius-max) x1 (+ x radius-x) y1 (+ y radius-y)))))) (case mode (:point (draw-point* pane x y :ink current-color :line-style line-style)) (:line (draw-line* pane x y x1 y1 :ink current-color :line-style line-style)) (:arrow (draw-arrow* pane x y x1 y1 :ink current-color :line-style line-style :to-head t :head-width 20 :head-length 20)) (:rectangle (draw-rectangle* pane x y x1 y1 :filled fill-mode :ink current-color :line-style line-style)) (:ellipse (draw-ellipse* pane x y radius-x 0 0 radius-y :filled fill-mode :ink current-color :line-style line-style)) (:bezier (let* ((cp-x1 (or cp-x1 x)) (cp-y1 (or cp-y1 y1)) (cp-x2 (or cp-x2 x1)) (cp-y2 (or cp-y2 y))) (unless (or (= x cp-x1 x1 cp-x2) (= y cp-y1 y1 cp-y2)) ; Don't draw null beziers. (let ((design (if fill-mode (mcclim-bezier::make-bezier-area* (list x y cp-x1 cp-y1 cp-x2 cp-y2 x1 y1 x1 y1 x y x y)) (mcclim-bezier::make-bezier-curve* (list x y cp-x1 cp-y1 cp-x2 cp-y2 x1 y1))))) (draw-design pane design :ink current-color :line-style line-style)) (draw-line* pane x y cp-x1 cp-y1 :ink +red+) (draw-line* pane x1 y1 cp-x2 cp-y2 :ink +blue+)))))))) (define-presentation-type figure ()) (define-presentation-method highlight-presentation ((type figure) record stream state) (declare (ignore record stream state)) nil) (defun handle-draw-object (pane x1 y1) (let* ((frame *application-frame*) (mode (slot-value frame 'drawing-mode)) cp-x1 cp-y1 cp-x2 cp-y2 output-record) (flet ((make-figure-output-record (x y) ;; Note that this can be NIL if (= x x1) and (= y y1). (setf output-record (with-output-to-output-record (pane) (with-output-as-presentation (pane nil 'figure) (draw-figure pane mode x1 y1 x y :cp-x1 cp-x1 :cp-y1 cp-y1 :cp-x2 cp-x2 :cp-y2 cp-y2)))))) (case mode (:point (make-figure-output-record x1 y1) (replay output-record pane)) (t (block processor (tracking-pointer (pane) (:pointer-motion (&key window x y) (declare (ignore window)) (set-status-line (format nil "~:(~A~) from (~D,~D) to (~D,~D)~@[ - Use ~ the middle and right mouse button to set ~ control points~]" mode (round x1) (round y1) (round x) (round y) (eq mode :bezier))) (when output-record (repaint-sheet pane (with-bounding-rectangle* (x1 y1 x2 y2) output-record (make-rectangle* (1- x1) (1- y1) (1+ x2) (1+ y2))))) (make-figure-output-record x y) (when output-record (replay output-record pane))) (:pointer-button-release (&key event x y) (when (= (pointer-event-button event) +pointer-left-button+) (return-from processor (values x y)))) (:pointer-button-press (&key event x y) (let ((button (pointer-event-button event))) (cond ((= button +pointer-right-button+) (setf cp-x1 x cp-y1 y)) ((= button +pointer-middle-button+) (setf cp-x2 x cp-y2 y))))))))) (set-status-line " ") (when output-record (push output-record (undo-list frame)) (stream-add-output-record pane output-record) (setf (redo-list *application-frame*) nil) (disable-commands frame 'com-redo) (enable-commands frame 'com-undo 'com-clear))))) (defun handle-move-object (pane figure first-point-x first-point-y) (multiple-value-bind (figure-x figure-y) (output-record-position figure) (let ((offset-x (- figure-x first-point-x)) (offset-y (- figure-y first-point-y))) (tracking-pointer (pane) (:pointer-motion (&key window x y) (declare (ignore window)) (setf (output-record-position figure) (values (+ x offset-x) (+ y offset-y))) (window-refresh pane)) (:pointer-button-release (&key event x y) (when (= (pointer-event-button event) +pointer-right-button+) (let ((frame *application-frame*)) (push (make-instance 'move-event :record figure :delta-x (- x first-point-x) :delta-y (- y first-point-y)) (undo-list frame)) (setf (redo-list frame) (list)) (disable-commands frame 'com-redo) (window-refresh pane) (return-from handle-move-object)))))))) (defun clim-fig () (run-frame-top-level (make-application-frame 'clim-fig))) (defun make-colored-button (color &key width height) (make-pane 'push-button :label " " :activate-callback (lambda (gadget) (setf (current-color (gadget-client gadget)) color)) :width width :height height :background color :foreground color :normal color :pushed-and-highlighted color :highlighted color)) (defun make-drawing-mode-button (label mode) (make-pane 'push-button :label label :activate-callback (lambda (gadget) (setf (drawing-mode (gadget-client gadget)) mode)))) (defun make-dashes-string (dashes) (if dashes (with-output-to-string (stream) (flet ((add-segment (length character) (write-string (make-string length :initial-element character) stream))) (loop for (dash space) on (append dashes dashes) by #'cddr do (add-segment dash #\-) (add-segment space #\Space)))) "none")) (defun make-merged-line-style (line-style &key unit thickness joint-shape cap-shape (dashes nil dashes-p)) (flet ((scale-dashes (dashes factor) (map (class-of dashes) (curry #'* factor) dashes))) (let* ((old-thickness (line-style-thickness line-style)) (thickness (or thickness old-thickness)) (old-dashes (line-style-dashes line-style)) (dashes (if dashes-p dashes (scale-dashes old-dashes (/ old-thickness))))) (make-line-style :unit (or unit (line-style-unit line-style)) :thickness thickness :joint-shape (or joint-shape (line-style-joint-shape line-style)) :cap-shape (or cap-shape (line-style-cap-shape line-style)) :dashes (scale-dashes dashes thickness))))) (define-application-frame clim-fig () ((drawing-mode :initform :line :accessor drawing-mode) (output-record :accessor root-output-record) (undo-list :initform nil :accessor undo-list) (redo-list :initform nil :accessor redo-list) (current-color :initform +black+ :accessor current-color) (line-style :initform (make-line-style) :accessor line-style) (fill-mode :initform nil :accessor fill-mode) (constrict-mode :initform nil :accessor constrict-mode) (status :initform nil :accessor status)) (:menu-bar menubar-command-table) (:panes (canvas canvas-pane :name 'canvas :display-time nil) (line-width-slider :slider :label "Line Width" :value 1 :min-value 1 :max-value 100 :value-changed-callback (lambda (gadget value) (declare (ignore gadget)) (with-slots (line-style) *application-frame* (setf line-style (make-merged-line-style line-style :thickness (round value))))) :show-value-p t :decimal-places 0 :orientation :horizontal) (dashes :option-pane :value nil :items '(nil (2 2) (4 4) (2 4) (4 2)) :name-key 'make-dashes-string :value-changed-callback (lambda (gadget value) (with-slots (line-style) (gadget-client gadget) (setf line-style (make-merged-line-style line-style :dashes value)))) :text-style (make-text-style :fix nil nil)) (round-shape-toggle :toggle-button :label "Round Cap/Joint" :value nil :value-changed-callback (lambda (gadget value) (with-slots (line-style) (gadget-client gadget) (let ((cap-shape (if value :round :butt)) (joint-shape (if value :round :miter))) (setf line-style (make-merged-line-style line-style :cap-shape cap-shape :joint-shape joint-shape)))))) (fill-mode-toggle :toggle-button :label "Fill" :value nil :value-changed-callback (lambda (gadget value) (setf (fill-mode (gadget-client gadget)) value))) (constrict-toggle :toggle-button :label "Constrict" :value nil :value-changed-callback (lambda (gadget value) (setf (constrict-mode (gadget-client gadget)) value))) ;; Drawing modes (point-button (make-drawing-mode-button "Point" :point)) (line-button (make-drawing-mode-button "Line" :line)) (arrow-button (make-drawing-mode-button "Arrow" :arrow)) (rectangle-button (make-drawing-mode-button "Rectangle" :rectangle)) (ellipse-button (make-drawing-mode-button "Ellipse" :ellipse)) (bezier-button (make-drawing-mode-button "Bezier" :bezier)) ;; Colors (black-button (make-colored-button +black+)) (blue-button (make-colored-button +blue+)) (green-button (make-colored-button +green+)) (cyan-button (make-colored-button +cyan+)) (red-button (make-colored-button +red+)) (magenta-button (make-colored-button +magenta+)) (yellow-button (make-colored-button +yellow+)) (white-button (make-colored-button +white+)) (turquoise-button (make-colored-button +turquoise+)) (grey-button (make-colored-button +grey+)) (brown-button (make-colored-button +brown+)) (orange-button (make-colored-button +orange+)) (undo :push-button :label "Undo" :active nil :activate-callback (lambda (x) (declare (ignore x)) (com-undo))) (redo :push-button :label "Redo" :active nil :activate-callback (lambda (x) (declare (ignore x)) (com-redo))) (clear :push-button :label "Clear" :active nil :activate-callback (lambda (x) (declare (ignore x)) (com-clear))) (status :label-pane :label "CLIM Fig")) (:layouts (default (vertically () (:fill (horizontally () (vertically (:width 150) (tabling (:height 60) (list black-button blue-button green-button cyan-button) (list red-button magenta-button yellow-button white-button) (list turquoise-button grey-button brown-button orange-button)) line-width-slider (horizontally (:spacing 4) (labelling (:label "Dashes")) dashes) round-shape-toggle (horizontally () fill-mode-toggle constrict-toggle) point-button line-button arrow-button ellipse-button rectangle-button bezier-button :fill) (:fill (scrolling (:width 600 :height 400) canvas)))) (horizontally (:height 30) clear undo redo) status))) (:top-level (default-frame-top-level :prompt 'prompt))) (defmethod frame-standard-output ((frame clim-fig)) (find-pane-named frame 'canvas)) (define-presentation-to-command-translator add-figure (blank-area com-add-figure clim-fig :gesture :select ; XXX :echo nil :tester ((object window) (declare (ignore object)) (typep window 'canvas-pane))) (object x y) (list x y)) (define-presentation-to-command-translator move-figure (figure com-move-figure clim-fig :gesture :menu ; XXX :echo nil) (object presentation x y) ;; xxx: inv-2016-08-22 ;; (declare (ignore object)) (list presentation x y)) (defmethod generate-panes :after (frame-manager (frame clim-fig)) (declare (ignore frame-manager)) (setf (root-output-record frame) ;; *standard-output* not bound to the canvas pane yet. (stream-current-output-record (frame-standard-output frame)) (status frame) (find-pane-named frame 'status))) (defun prompt (stream frame) (declare (ignore stream frame))) (defmethod note-command-enabled :after (frame-manager (frame clim-fig) command-name) (case command-name (com-undo (activate-gadget (find-pane-named frame 'undo))) (com-redo (activate-gadget (find-pane-named frame 'redo))) (com-clear (activate-gadget (find-pane-named frame 'clear))))) (defmethod note-command-disabled :after (frame-manager (frame clim-fig) command-name) (case command-name (com-undo (deactivate-gadget (find-pane-named frame 'undo))) (com-redo (deactivate-gadget (find-pane-named frame 'redo))) (com-clear (deactivate-gadget (find-pane-named frame 'clear))))) (defun enable-commands (frame &rest command-names) (dolist (command-name command-names) (setf (command-enabled command-name frame) t))) (defun disable-commands (frame &rest command-names) (dolist (command-name command-names) (setf (command-enabled command-name frame) nil))) (define-clim-fig-command com-exit () (frame-exit *application-frame*)) (define-clim-fig-command com-undo () "Undo the previous command, which might have been either 'draw a new object', 'move an object', or the CLEAR command. In the first case, remove the record and add it to the redo list; in the second case, move the object back to its previous position; to undo a CLEAR, replay the output-history." (when-let ((latest-undo-entry (pop (undo-list *application-frame*)))) (cond ((typep latest-undo-entry 'move-event) (multiple-value-bind (x y) (output-record-position (record latest-undo-entry)) (setf (output-record-position (record latest-undo-entry)) (values (- x (delta-x latest-undo-entry)) (- y (delta-y latest-undo-entry)))) (window-refresh *standard-output*)) (push latest-undo-entry (redo-list *application-frame*)) (enable-commands *application-frame* 'com-redo)) ((listp latest-undo-entry) (loop for record in latest-undo-entry do (stream-add-output-record *standard-output* record) (replay record *standard-output* (bounding-rectangle record))) (enable-commands *application-frame* 'com-clear) (disable-commands *application-frame* 'com-redo)) (T (erase-output-record latest-undo-entry *standard-output*) (push latest-undo-entry (redo-list *application-frame*)) (enable-commands *application-frame* 'com-clear 'com-redo))) (unless (undo-list *application-frame*) (disable-commands *application-frame* 'com-undo 'com-clear)))) (define-clim-fig-command com-redo () (when-let ((current-redo-entry (pop (redo-list *application-frame*)))) (push current-redo-entry (undo-list *application-frame*)) (enable-commands *application-frame* 'com-undo 'com-clear) (cond ((typep current-redo-entry 'move-event) (multiple-value-bind (x y) (output-record-position (record current-redo-entry)) (setf (output-record-position (record current-redo-entry)) (values (+ x (delta-x current-redo-entry)) (+ y (delta-y current-redo-entry))))) (window-refresh *standard-output*)) (T (stream-add-output-record *standard-output* current-redo-entry) (replay current-redo-entry *standard-output* (bounding-rectangle current-redo-entry)))) (unless (redo-list *application-frame*) (disable-commands *application-frame* 'com-redo)))) (define-clim-fig-command com-clear () (push (coerce (output-record-children (root-output-record *application-frame*)) 'list) (undo-list *application-frame*)) (setf (redo-list *application-frame*) (list)) (disable-commands *application-frame* 'com-redo 'com-clear) (window-clear *standard-output*)) (define-clim-fig-command (com-add-figure :name nil) ((x real) (y real)) (handle-draw-object (find-pane-named *application-frame* 'canvas) x y)) (define-clim-fig-command (com-move-figure :name nil) ((figure figure) (x real) (y real)) (handle-move-object (find-pane-named *application-frame* 'canvas) figure x y)) (make-command-table 'file-command-table :errorp nil :menu '(("Exit" :command com-exit))) (make-command-table 'edit-command-table :errorp nil :menu '(("Undo" :command com-undo) ("Redo" :command com-redo) ("Clear" :command com-clear))) (make-command-table 'menubar-command-table :errorp nil :menu '(("File" :menu file-command-table) ("Edit" :menu edit-command-table))) I hoped to figure out how the code works CLIM-FIG> (defvar c) C CLIM-FIG> (setf c (make-instance 'clim-fig)) #<CLIM-FIG {10042E0403}> I thought to use instance of clim-fig to get it slot-values, but get lost on the way. How you guys manage to understand big pieces of code. May you share your experience with me. Very best, Igor

1 0

Jump to page:

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

mcclim-devel