source: trunk/abcl/src/org/armedbear/lisp/scripting/lisp/packages.lisp

Last change on this file was 11894, checked in by astalla, 15 years ago

Fixed function evaluation using invokeFunction. It was broken since last
commit on JSR-223. Now invokeFunction uses the same "eval-in-script-context"
macro that is used to evaluate interpreted and compiled code in the right
environment, including special variables from the ScriptContext?.
In passing, the invokeFunction() method has also been fixed so that
javaInstance() is called on its return value, like it happens in all other
kinds of Lisp calls from Java.

  • Property svn:eol-style set to LF
File size: 2.1 KB
Line 
1;;; packages.lisp
2;;;
3;;; Copyright (C) 2008 Alessio Stalla
4;;;
5;;; This program is free software; you can redistribute it and/or
6;;; modify it under the terms of the GNU General Public License
7;;; as published by the Free Software Foundation; either version 2
8;;; of the License, or (at your option) any later version.
9;;;
10;;; This program is distributed in the hope that it will be useful,
11;;; but WITHOUT ANY WARRANTY; without even the implied warranty of
12;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13;;; GNU General Public License for more details.
14;;;
15;;; You should have received a copy of the GNU General Public License
16;;; along with this program; if not, write to the Free Software
17;;; Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
18;;;
19;;; As a special exception, the copyright holders of this library give you
20;;; permission to link this library with independent modules to produce an
21;;; executable, regardless of the license terms of these independent
22;;; modules, and to copy and distribute the resulting executable under
23;;; terms of your choice, provided that you also meet, for each linked
24;;; independent module, the terms and conditions of the license of that
25;;; module.  An independent module is a module which is not derived from
26;;; or based on this library.  If you modify this library, you may extend
27;;; this exception to your version of the library, but you are not
28;;; obligated to do so.  If you do not wish to do so, delete this
29;;; exception statement from your version.
30
31(defpackage :abcl-script
32  (:use :cl :java)
33  (:export 
34   #:compile-script
35   #:*compile-using-temp-files*
36   #:configure-abcl
37   #:eval-compiled-script
38   #:eval-function
39   #:eval-script
40   #:define-java-interface-implementation
41   #:find-java-interface-implementation
42   #:*launch-swank-at-startup*
43   #:register-java-interface-implementation
44   #:remove-java-interface-implementation
45   #:+standard-debugger-hook+
46   #:*swank-dir*
47   #:*swank-port*
48   #:*use-throwing-debugger*))
49
50(defpackage :abcl-script-user
51  (:use :cl :ext :java :abcl-script))
Note: See TracBrowser for help on using the repository browser.