Hi there ...
PREFIX => 'gtk_';
^^^^^^^^^^^^^^^^^
If I'm not dead wrong now, you are the one in the bad state ;-)
But I fixed the problem with changing
gtk_init(&argc, &argv); => gtk_init(NULL, NULL);
Works fine now and below is the little result of the hack ;-))
> ------_=_NextPart_001_01C09B90.1EEB4F30
> Content-Type: text/plain;
> charset="iso-8859-1"
>
> Jens,
>
> You're in a bad state when I can figure your problem out ;-)
>
>
> From: Jens Luedicke [mailto:[EMAIL PROTECTED]]
> >
> >
> > hello_world("Hi there ...\n", $#ARGV, @ARGV);
> ^^^^^^^^^^^
> >
> >
> > int gtk_hello_world(char *msg, int argc, char *argv[])
> ^^^^^^^^^^^^^^^
>
> ------_=_NextPart_001_01C09B90.1EEB4F30--
--
with friendly regards....
jens luedicke <[EMAIL PROTECTED]>
PMC - Perl Mail Client
http://www.irs-net.com/
BEGIN {@code="#include<gtk/gtk.h>\nint japh(char *m){GtkWidget
*w,*b;gtk_init(NULL,NULL);w=gtk_window_new(GTK_WINDOW_TOPLEVEL);
gtk_window_set_title(GTK_OBJECT(w),\"JAPH!\");b=gtk_button_new_with_label(
m);gtk_container_add(GTK_CONTAINER(w),b);gtk_widget_show_all(w);gtk_main();}"};
use Inline C=>'Config'=>LIBS=>`gtk-config --libs`,INC=>`gtk-config --cflags`;
Inline->bind(C=>@code);japh("Just another Perl Hacker!");
