/* voc 2.1.0 [2017/07/17] for gcc LP64 on arch xtpam */ #define SHORTINT INT8 #define INTEGER INT16 #define LONGINT INT32 #define SET UINT32 #include "SYSTEM.h" #include "Out.h" typedef INT16 (*Test_MyArr[3])[6]; static Test_MyArr Test_a; static void EnumPtrs(void (*P)(void*)) { __ENUMP(Test_a, 3, P); } export int main(int argc, char **argv) { __INIT(argc, argv); __MODULE_IMPORT(Out); __REGMAIN("Test", EnumPtrs); /* BEGIN */ Out_Open(); Test_a[0] = __NEWARR(NIL, 2, 2, 1, 0, ((INT64)(6))); (*Test_a[0])[0] = 1; Out_Int((*Test_a[0])[0], 0); Out_Ln(); Out_Flush(); __FINI; }