wl

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

swt1.l (299B)

      1 # http://dev.eclipse.org/viewcvs/index.cgi/org.eclipse.swt.snippets/src/org/eclipse/swt/snippets/Snippet1.java?view=co
      2 
      3 (load "swt.l")
      4 
      5 (setq D (jnew Display)
      6       S (jnew Shell D)
      7       L (jnew Label S (jfield SWT 'NONE)) )
      8 
      9 (L 'setText "Hello World")
     10 (L 'pack)
     11 (S 'pack)
     12 (S 'open)
     13 
     14 (swtLoop D S)