2 * Acess2 - SpiderScript
3 * - Script Exports (Lang. Namespace)
8 #include <spiderscript.h>
11 tSpiderObject *Exports_Lang_Struct(tSpiderScript *Script, int NArgs, tSpiderObject **Args);
14 int gaExports_Lang_Struct_Args[] = {SS_DATATYPE_STRING,-1};
16 tSpiderFunction gaSpiderScript_Exports[] = {
17 {"Lang.Struct", Exports_Lang_Struct, gaExports_Lang_Struct_Args}
19 const int giSpiderScript_NumExports = sizeof(gaSpiderScript_Exports)/sizeof(tSpiderFunction);
22 tSpiderObject *Exports_Lang_Struct(tSpiderScript *Script, int NArgs, tSpiderObject **Args)
25 printf("Exports_Lang_Struct: (Script=%p, NArgs=%i, Args=%p)\n", Script, NArgs, Args);
27 for( i = 0; i < NArgs; i ++ )
29 printf(" Args[%i] = {Type: %i, ", i, Args[i]->Type);
32 case SS_DATATYPE_INTEGER:
33 printf(" Integer: 0x%lx", Args[i]->Integer);
35 case SS_DATATYPE_REAL:
36 printf(" Real: %f", Args[i]->Real);
38 case SS_DATATYPE_STRING:
39 printf(" Length: %i, Data = '%s'", Args[i]->String.Length, Args[i]->String.Data);