JLIB windowing library (about 500 lines of JScheme)

Continuing with previous example of Java/JScheme GUIs:

;; JLIB
(define w 
  (window "Test"
     (button "exit" red
             (action(lambda(e)(exit))))))
(.pack w) (.show w)

instead of

;; JScheme
(define w (JFrame. "Test"))
(define eb (JButton. "Exit"))
(.setBackground eb Color.red$)
(.addActionListener eb 
   (Listener. (lambda(e) (System.exit 0))))
(.add (.getContentPane w) eb) 
(.pack w) (.show w)

continue

set preferences

LL2, Saturday 9 November 2002, Tim Hickey/Ken Anderson