From edi at agharta.de Sat Jan 1 11:42:55 2005 From: edi at agharta.de (Edi Weitz) Date: Sat, 01 Jan 2005 12:42:55 +0100 Subject: [rdnzl-devel] enable-rdnzl-syntax In-Reply-To: (Francisco Rivera's message of "Thu, 30 Dec 2004 23:34:55 -0600") References: Message-ID: On Thu, 30 Dec 2004 23:34:55 -0600, "Francisco Rivera" wrote: > In LW Personal 4.3.7 I obtain the below errors when in the Editor, > on "Calculator function" I select Definitions --> Compile > > Previously all code was compiled with Buffer --> Compile > > The problem disappears when evaluate (enable-rdnzl-syntax) on > Listener. That should have given you a hint. > Why? Obviously, when you select Buffer --> Compile LispWorks uses COMPILE-FILE, and when you select Definitions --> Compile the forms are evaluated and compiled in the listener. Look up the entry for COMPILE-FILE in the HyperSpec - it rebinds *READTABLE*, i.e. changes made to the readtable during COMPILE-FILE (or LOAD, for that matter) won't persist. Cheers, Edi. From jfrivera56 at hotmail.com Sun Jan 2 22:10:27 2005 From: jfrivera56 at hotmail.com (Francisco Rivera) Date: Sun, 2 Jan 2005 16:10:27 -0600 Subject: [rdnzl-devel] Keys comparision Message-ID: Hello, I will like make a "between" comparison of Keys enumerator. The below code works fine, but I will like know if [%KeyCode e] is between [$Keys.D0] and [$Keys.D9] (defun learning () (let ((form (new "Form"))) [+KeyDown form (new "KeyEventHandler" #'(lambda (o e) (declare (ignore o)) (cond ([Equals [%KeyCode e] [$Keys.D0]] (message-box "Zero")))))] form)) Regards Francisco Rivera jfrivera56 at hotmail.com -------------- next part -------------- An HTML attachment was scrubbed... URL: From edi at agharta.de Mon Jan 3 00:35:10 2005 From: edi at agharta.de (Edi Weitz) Date: Mon, 03 Jan 2005 01:35:10 +0100 Subject: [rdnzl-devel] New version 0.6.0 Message-ID: Hi and Happy New Year! This new version of RDNZL has preliminary support for "direct calls" - see . They currently don't work with Corman Lisp but we'll see... Here's the full Changelog entry: Version 0.6.0 2005-01-03 Support for "direct calls" Fixed typo (forgot RESOLVE-TYPE-NAME) in FIELD Fixed thinko in OR-ENUMS Make sure SETF accessors in container.lisp return NEW-VALUE Download: . Here's the Changelog entry for the C++ source code: Version 0.4.0 2005-01-03 Added interface functions for "direct calls" Added ChangeType code to setDotNetContainerTypeFromString Download: . Cheers, Edi. From edi at agharta.de Mon Jan 3 00:44:01 2005 From: edi at agharta.de (Edi Weitz) Date: Mon, 03 Jan 2005 01:44:01 +0100 Subject: [rdnzl-devel] Keys comparision In-Reply-To: (Francisco Rivera's message of "Sun, 2 Jan 2005 16:10:27 -0600") References: Message-ID: On Sun, 2 Jan 2005 16:10:27 -0600, "Francisco Rivera" wrote: > I will like make a "between" comparison of Keys enumerator. > > The below code works fine, but I will like know if [%KeyCode e] is between > [$Keys.D0] and [$Keys.D9] > > (defun learning () > (let ((form (new "Form"))) > [+KeyDown form > (new "KeyEventHandler" > #'(lambda (o e) > (declare (ignore o)) > (cond ([Equals [%KeyCode e] [$Keys.D0]] (message-box "Zero")))))] > form)) How about ENUM-TO-INTEGER? Cheers, Edi. From edi at agharta.de Mon Jan 3 00:51:08 2005 From: edi at agharta.de (Edi Weitz) Date: Mon, 03 Jan 2005 01:51:08 +0100 Subject: [rdnzl-devel] New version 0.6.1 In-Reply-To: (Edi Weitz's message of "Mon, 03 Jan 2005 01:35:10 +0100") References: Message-ID: Sorry. Version 0.6.1 2005-01-03 Make sure SETF accessors in direct.lisp return NEW-VALUE (sigh...)