;; Java
final JFrame w = new JFrame("Test");
JButton eb = new JButton("Exit");
eb.setBackground(Color.red);
eb.addActionListener(new ActionListener(){
public void actionPerformed(ActionEvent e) {
System.exit(0);}});
w.getContentPane().add(eb);
w.pack(); w.show();
;; JScheme (import "javax.swing.*") (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)
LL2, Saturday 9 November 2002, Tim Hickey/Ken Anderson