Skip to content

Instantly share code, notes, and snippets.

@alcidesfp

alcidesfp/gist:8100459

Created December 23, 2013 16:51
Show Gist options
  • Save alcidesfp/8100459 to your computer and use it in GitHub Desktop.
Save alcidesfp/8100459 to your computer and use it in GitHub Desktop.
Download ZIP
Snippet de código en Kawa con Swing
Raw
gistfile1.scm
;; -*- coding: utf-8; mode: Scheme -*-
;; Snippet de código utilizando Swing en Kawa
(define-alias JFrame javax.swing.JFrame)
(define-alias JLabel javax.swing.JLabel)
(let ((frame1 (JFrame "Ventana Hola")))
(*:add frame1 (JLabel "Hola a todos desde Kawa"))
(*:pack frame1)
(*:setDefaultCloseOperation frame1 JFrame:EXIT_ON_CLOSE)
(*:setVisible frame1 #t))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment