- mcclim-devel - mailman3.common-lisp.net

Regression in compose-xx-with-transformation
by Paul Werkowski 23 Mar '21

23 Mar '21

A recent change in master branch seems to have reversed the argument order in the subject definitions. I've only checked compose-scaling-with-transformation which is again wrong causing my graphics to be written way off screen. Paul

2 3

default-icons.lisp
by Paul Werkowski 17 Jan '21

17 Jan '21

Lispworks/Windows uses :host for windows drive letter. ----------------------------------- @@ -3,10 +3,11 @@ (flet ((load-icon (name) (let* ((file-pathname #.(or *compile-file-pathname* *load-pathname*)) (icon-pathname (merge-pathnames (make-pathname :directory '(:relative "data") + :host (pathname-host file-pathname) :name name :type "png") file-pathname))) (make-pattern-from-bitmap-file icon-pathname :format :png)))) (unless *default-icon-large*

1 0

Fw: New Year's puzzle
by Daniel Kochmański 03 Jan '21

03 Jan '21

Accidently send to the sender, not the mailing list, forwarding -------- Oryginalna wiadomość -------- ‎ 3 sty 2021, 16:52, Daniel Kochmański napisał(a): > If the beer is at stake, I shall take a guess! > > When 1+ is used, we draw beyond the sheet region. That means, that *if* > we call change-space-requirements it will cause a call to resize-sheet, > which in turn will: a) clear the screen, b) call redisplay-frame-pane. > > Since the sheet region has changed, redisplaying the frame pane will > expand it even further, so we go back to the *if* part. > > Now, regarding the *if*, we have a bogus method: > > (defmethod stream-read-gesture :before ((stream clim-stream-pane) > &key timeout peek-p > input-wait-test > input-wait-handler > pointer-button-press-handler) > (declare (ignore timeout peek-p input-wait-test input-wait-handler > pointer-button-press-handler)) > (force-output stream) > ;; make the output visible > (let ((w (bounding-rectangle-max-x (stream-output-history stream))) > (h (bounding-rectangle-max-y (stream-output-history stream)))) > (unless (region-contains-region-p (sheet-region stream) > (make-rectangle* 0 0 w h)) > (change-space-requirements stream) > (finish-output stream) > (redisplay-frame-pane *application-frame* stream)))) > > that causes bogus redisplays before each gesture read, so when we move > the pointer over the window, we enter the loop: > > 1. display (and expand the output history) > 2. move the pointer > 3. change space requirements (and resize) > 4. goto 1 > > as a bonus point we have one more unnecessary redisplay. > > The fun part is that I have changes stashed that remove this method. > > All best, > Daniel > > -- > Daniel Kochmański ;; aka jackdaniel | Przemyśl, Poland > TurtleWare - Daniel Kochmański | www.turtleware.eu > > "Be the change that you wish to see in the world." - Mahatma Gandhi > > ‐‐‐‐‐‐‐ Original Message ‐‐‐‐‐‐‐ > On Sunday, 3 January 2021 16:18, Paul Werkowski <pw(a)snoopy.qozzy.com> wrote: > >> Run the frame as is. Grab the lower corner with mouse pointer. Move it >> around. >> >> Then change either or both of the (1+ ...) forms to (1- ...) and see >> what happens. >> >> A free virtual beer to whomever solves it.

2 1

New Year's puzzle
by Paul Werkowski 03 Jan '21

03 Jan '21

Run the frame as is. Grab the lower corner with mouse pointer. Move it around. Then change either or both of the (1+ ...) forms to (1- ...) and see what happens. A free virtual beer to whomever solves it.

1 0

resize-sheet :after
by Paul Werkowski 30 Dec '20

30 Dec '20

(defmethod resize-sheet :after ((pane example-pane) width height) (window-clear pane) (redisplay-frame-pane (pane-frame pane) pane)) Apparently no developer has tried this as there are two time bombs waiting to blow up the call stack. WINDOW-CLEAR, besides writing +background-ink+ over the pane, goes on to set width and height of the sheet to zero and then call CHANGE-SPACE-REQUIREMENTS, which calls RESIZE-SHEET --> BOOM! REDISPLAY-FRAME-PANE is implemented using RESTART-CASE, which in my 35 years with CL I have never had the occasion to use. Its restartable-form manages to call itself via CALL-NEXT-METHOD (I think) which then blows the stack, which then unwinds back through various restart clauses (some which also call WINDOW-CLEAR), finally resulting in getting back to a listener prompt where one can bail out. For my use, I have re-written those two methods in a way that works for the several places where I use resize-sheet :after with good results. The attachment is one of the test cases I used to diagnose the stack blowup. It displays a green filled circle in the center of the pane. Drag a side or corner of the frame around with your pointer device to cause the resize events to occur. With those two changes my 15 year old CLIM2 plotting applications works quite well although there is still a few places where pointer motion or dragging yield strange results. One other thing, if frame startup manages to silently load the NULL port, it may take a very long time to figure out why the lisp listener is dead. 🙁 Wishing you all a great new year! Paul

1 0

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