wl

Unnamed repository; edit this file 'description' to name the repository.
git clone https://logand.com/git/wl.git/
Log | Files | Refs | LICENSE

swing3.l (229B)


      1 (load "swing.l")
      2 
      3 (setq F (jnew JFrame "HelloWorldSwing"))
      4 (setq L (jnew JLabel "Hello World"))
      5 (setq C (F 'getContentPane))
      6 
      7 (C 'add L)
      8 (F 'setDefaultCloseOperation (jfield JFrame 'EXIT_ON_CLOSE))
      9 (F 'pack)
     10 (F 'setVisible true)