Re: Help, writing kawa equivalent of java program

["Sudarshan S Chawathe" <chaw@eip10.org>]

> (define-alias library com.sun.jna.Library)
> (define-alias native com.sun.jna.Native)
> 
> (define-simple-class libc (library)
>   interface: #t
>   (getpid::long))
> 
> (define inst::libc (native:loadLibrary "c" libc:class))
> (display (inst:getpid))

I think you need to define the interface to have a getpid method with
the proper signature.  Here is a small example, somewhat similar to your
code, that I tried a while back and that works:

(define-simple-class clib (com.sun.jna.Library)
  interface: #t
  ((puts (s ::String)) ::void #!abstract))

((as clib
     (com.sun.jna.Native:loadLibrary "c" clib)):puts "Hello, World!")

Regards,

-chaw