public inbox for kawa@sourceware.org
 help / color / mirror / Atom feed
* Problem running Javafx hello world application
@ 2017-06-07  6:27 Tony West
  2017-06-07  9:13 ` Damien MATTEI
  2017-06-07 21:21 ` Per Bothner
  0 siblings, 2 replies; 6+ messages in thread
From: Tony West @ 2017-06-07  6:27 UTC (permalink / raw)
  To: kawa

Hi,

Based on what I've seen in the mailing list, I've got the following simple Javafx application:

(module-name <org.kawa.javafx>)
(module-extends <javafx.application.Application>)
(module-export start create-button)
(module-compile-options main: #t)

;;
;;; Application
;;

(define (start (primary-stage :: <javafx.stage.Stage>)) :: <void>
  (invoke primary-stage 'setTitle "Hello World!")
  (let ((root-pane (<javafx.scene.layout.StackPane>))
        (button (create-button
                 text: "Say 'Hello World'"
                 event-handler: (lambda (event) (format #t "Hello World!")))))
    (invoke (invoke root-pane 'getChildren) 'add button)
    (invoke primary-stage 'setScene (<javafx.scene.Scene> root-pane 300 250))
    (invoke primary-stage 'show)))

;;
;;; Utilities
;;

(define (create-button #!key (text #f) (event-handler #f)) :: <javafx.scene.control.Button> 
  (let ((button :: <javafx.scene.control.Button> (<javafx.scene.control.Button>)))
    (when text
      (invoke button 'setText text))

    (when event-handler
      (invoke button 'setOnAction (object (<javafx.event.EventHandler>)
                                    ((handle (event :: <javafx.event.ActionEvent>))
                                      (event-handler event)))))

    button))


;;
;;; Main
;;

(define (main)
  (invoke-static <org.kawa.javafx> 'launch))

(main)

When compiling I get the following:

E:\Work\kawa>kawa --main -C hello-world.scm
Jun 07, 2017 4:16:42 PM org.jline.utils.Log logr
WARNING: Unable to create a system terminal, creating a dumb terminal (enable debug logging for more information)
(compiling hello-world.scm to org.kawa.javafx)

And when I run it I get the following:

E:\Work\kawa>java org.kawa.javafx
java.lang.reflect.InvocationTargetException
        at sun.reflect.NativeMethodAccessorImpl.invoke0(Native Method)
        at sun.reflect.NativeMethodAccessorImpl.invoke(Unknown Source)
        at sun.reflect.DelegatingMethodAccessorImpl.invoke(Unknown Source)
        at java.lang.reflect.Method.invoke(Unknown Source)
        at com.sun.javafx.application.LauncherImpl.launchApplicationWithArgs(LauncherImpl.java:389)
        at com.sun.javafx.application.LauncherImpl.launchApplication(LauncherImpl.java:328)
        at sun.reflect.NativeMethodAccessorImpl.invoke0(Native Method)
        at sun.reflect.NativeMethodAccessorImpl.invoke(Unknown Source)
        at sun.reflect.DelegatingMethodAccessorImpl.invoke(Unknown Source)
        at java.lang.reflect.Method.invoke(Unknown Source)
        at sun.launcher.LauncherHelper$FXHelper.main(Unknown Source)
Caused by: java.lang.IncompatibleClassChangeError: Expected static field org.kawa.javafx$frame.$main
        at org.kawa.javafx.main(hello-world.scm)
        ... 11 more
Exception running application org.kawa.javafx

I would be really grateful if someone could point out what I am doing wrong.

Thanks.

Tony

^ permalink raw reply	[flat|nested] 6+ messages in thread
end of thread, other threads:[~2017-06-09  7:29 UTC | newest]

Thread overview: 6+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2017-06-07  6:27 Problem running Javafx hello world application Tony West
2017-06-07  9:13 ` Damien MATTEI
2017-06-07 20:51   ` Tony West
2017-06-07 21:21 ` Per Bothner
     [not found]   ` <SG2PR0401MB1982C9DBD03FC99CC1F0152DE1C90@SG2PR0401MB1982.apcprd04.prod.outlook.com>
2017-06-08 14:13     ` Per Bothner
2017-06-09  7:29       ` Tony West

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).