Skip to content

Instantly share code, notes, and snippets.

@alcidesfp

alcidesfp/gist:2591169

Created May 4, 2012 01:44
Show Gist options
  • Save alcidesfp/2591169 to your computer and use it in GitHub Desktop.
Save alcidesfp/2591169 to your computer and use it in GitHub Desktop.
Download ZIP
Snippet Swing Kawa
Raw
gistfile1.scm
(define-alias JFrame javax.swing.JFrame)
(let ((f (JFrame "Hola")))
(f:add (javax.swing.JLabel "¡Hola a todos!"))
(f:pack)
(f:setDefaultCloseOperation JFrame:EXIT_ON_CLOSE)
(f:setVisible #t))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment