Enlightenment CVS committal

Author  : raster
Project : e17
Module  : libs/embryo

Dir     : e17/libs/embryo/src/lib


Modified Files:
        embryo_amx.c 


Log Message:


wow. now THAT was interesting. multiple native call entries in the native
symbol table... so returning once the first was set was not a good idea.

===================================================================
RCS file: /cvsroot/enlightenment/e17/libs/embryo/src/lib/embryo_amx.c,v
retrieving revision 1.21
retrieving revision 1.22
diff -u -3 -r1.21 -r1.22
--- embryo_amx.c        16 Jul 2004 03:20:18 -0000      1.21
+++ embryo_amx.c        24 Aug 2004 06:37:26 -0000      1.22
@@ -361,7 +361,10 @@
             if ((entry_name) && (!strcmp(entry_name, name)))
               {
                  func_entry->address = ep->native_calls_size;
-                 return;
+                 /* FIXME: embryo_cc is putting in multiple native */
+                 /* function call entries - so we need to fill in all */
+                 /* of them!!! */
+                 /* return; */
               }
          }
        func_entry = 
@@ -1531,6 +1534,25 @@
                       ep->run_count--;
                       return EMBRYO_PROGRAM_SLEEP;
                    }
+                   {
+                      Embryo_Header    *hdr;
+                      int i, num;
+                      Embryo_Func_Stub *func_entry;
+                      
+                      hdr = (Embryo_Header *)ep->code;
+                      num = NUMENTRIES(hdr, natives, libraries);
+                      func_entry = GETENTRY(hdr, natives, 0);
+                      for (i = 0; i < num; i++)
+                        {
+                           char *entry_name;
+                           
+                           entry_name = GETENTRYNAME(hdr, func_entry);
+                           if (i == offs)
+                             printf("EMBRYO: CALL [%i] %s() non-existant!\n", i, 
entry_name);
+                           func_entry =
+                             (Embryo_Func_Stub *)((unsigned char *)func_entry + 
hdr->defsize);
+                        }
+                   }
                  ABORT(ep, num);
               }
             break;




-------------------------------------------------------
SF.Net email is sponsored by Shop4tech.com-Lowest price on Blank Media
100pk Sonic DVD-R 4x for only $29 -100pk Sonic DVD+R for only $33
Save 50% off Retail on Ink & Toner - Free Shipping and Free Gift.
http://www.shop4tech.com/z/Inkjet_Cartridges/9_108_r285
_______________________________________________
enlightenment-cvs mailing list
[EMAIL PROTECTED]
https://lists.sourceforge.net/lists/listinfo/enlightenment-cvs

Reply via email to