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

[mcclim-devel] Patch: add the stopwatch example.
by Douglas Crosher 18 Oct '06

18 Oct '06

* defsystem :clim-examples: add the stopwatch example. Index: mcclim.asd =================================================================== RCS file: /project/mcclim/cvsroot/mcclim/mcclim.asd,v retrieving revision 1.23 diff -u -u -r1.23 mcclim.asd --- mcclim.asd 3 Jul 2006 04:58:41 -0000 1.23 +++ mcclim.asd 18 Oct 2006 00:13:54 -0000 @@ -342,6 +342,7 @@ (:file "gadget-test") (:file "accepting-values") (:file "method-browser") + (:file "stopwatch") (:file "dragndrop-translator") (:file "draggable-graph") (:file "text-size-test")

1 0

[mcclim-devel] Patch: Fix system pathnames.
by Douglas Crosher 18 Oct '06

18 Oct '06

* defsystem :clouseau: avoid pathname directory namestrings in file component names; reworking to be more portable. Index: mcclim.asd =================================================================== RCS file: /project/mcclim/cvsroot/mcclim/mcclim.asd,v retrieving revision 1.23 diff -u -u -r1.23 mcclim.asd --- mcclim.asd 3 Jul 2006 04:58:41 -0000 1.23 +++ mcclim.asd 18 Oct 2006 00:13:54 -0000 @@ -417,9 +418,12 @@ :depends-on (:mcclim) :serial t :components - ((:file "Apps/Inspector/package") - (:file "Apps/Inspector/disassembly") - (:file "Apps/Inspector/inspector"))) + ((:module "Apps/Inspector" + :pathname #.(make-pathname :directory '(:relative "Apps" "Inspector")) + :components + ((:file "package") + (:file "disassembly") + (:file "inspector"))))) (defmethod perform :after ((op load-op) (c (eql (find-system :clim)))) (pushnew :clim *features*)

1 0

[mcclim-devel] draw-arrow with transformation, freetype with fix(ed) fonts
by Luigi Panzeri 14 Oct '06

14 Oct '06

Hi all (and good holiday if you are in vacation), i noted two strange behavior, but I am not a clim expert but so sorry if i miss something. 1) draw-arrow* use the line-style-thickness to calculate distances in order to draw the head, but that thickness is not transformed with the current user transformation. So for example: (in-package :clim-user) (define-application-frame foo () () (:panes (app :application :width 1000 :height 1000 :display-function #'display)) (:layouts (default (vertically () app)))) (defun display (frame stream) (declare (ignore frame)) (with-first-quadrant-coordinates (stream 0 1000) (with-scaling (stream 250 250) ;; so now it is 4x4 (draw-line* stream 2 1 2 2.5) (draw-arrow* stream 1 1 1 2.5 :head-length 0.1 :head-width 0.1)))) (run-frame-top-level (make-application-frame 'foo)) i draw a 4x4 grid drawing a line and a parallel arrow (of the same length), but the two drawing is not of the same length. I tried to fix that (see first attachment). 2) in make-text-style i can specify the font family with :fix or :fixed for fixed fonts, but the freetype experimental extension accept only :fix (that is standard-compliant afaik). Do you have suggestion for the delivery of mcclim application (e.g. to avoid the debugger et similia)?

2 1

[mcclim-devel] braindump: TODOs before a new mcclim release
by Andreas Fuchs 10 Oct '06

10 Oct '06

Okay, I'd like to do a new release, but with the beginning of the semester, I could use a bit of assistance with a few things. Here are the release-critical things that I won't be able to do alone (ordered by severity): * Fix clisp build failure: message "pointer-butt missing (mcclim 0.9.2)" by Eric Y. Kow, 2006-06-09: I lack a clisp setup. * Test current CVS on non-SBCL and non-ACL. CMUCL is a good candidate (: (Of course, testing on SBCL and ACL is always welcome, too!) The rest looks pretty ok, AFAICT. But if you want to help with any of the following, you're welcome: * Fix the X server memory/resource leak when using double-buffering and mcclim-freetype. * Find a way to make mcclim asdf-installable that makes all contribs/Apps/Experimental systems available right away. * Improve performance in incremental redisplay (; Thanks!, -- Andreas Fuchs, (http://|im:asf@|mailto:asf@)boinkor.net, antifuchs

1 0