[svn:parrot] r18656 - trunk/lib/Parrot/Ops2c

[chromatic]

Author: chromatic
Date: Sat May 26 18:38:46 2007
New Revision: 18656

Modified:
   trunk/lib/Parrot/Ops2c/Utils.pm

Log:
[Ops] Fixed the code generator for dynops to create warning-free code by adding 
a function declaration.

I love that C busy-work!

Modified: trunk/lib/Parrot/Ops2c/Utils.pm
==============================================================================
--- trunk/lib/Parrot/Ops2c/Utils.pm     (original)
+++ trunk/lib/Parrot/Ops2c/Utils.pm     Sat May 26 18:38:46 2007
@@ -1014,11 +1014,13 @@
 /*
  * dynamic lib load function - called once
  */
+$self->{sym_export} PMC*
+$load_func(Parrot_Interp interp);
 
 $self->{sym_export} PMC*
 $load_func(Parrot_Interp interp)
 {
-    PMC *lib = pmc_new(interp, enum_class_ParrotLibrary);
+    PMC *lib            = pmc_new(interp, enum_class_ParrotLibrary);
     PMC_struct_val(lib) = (void *) $self->{init_func};
     dynop_register(interp, lib);
     return lib;