Struggling with Struct arrays

[DruggedBunnyParticipant]

Struct arrays are weird! Having to New them in the struct itself seems unintuitive (seems like more of a runtime thing), but although this seems to parse fine, it doesn’t run (“Failed to start process blah.exe”):

Monkey

#Import "<std>" #Import "<windows.h>" #Import "<tlhelp32.h>" Using std.. Const MAX_PATH:Int Struct PROCESSENTRY32 FIeld dwSize:Uint FIeld cntUsage:Uint FIeld th32ProcessID:Uint Field th32DefaultHeapID:ULong Ptr FIeld th32ModuleID:Uint FIeld cntThreads:Uint FIeld th32ParentProcessID:UInt Field pcPriClassBase:Long FIeld dwFlags:UInt Field szExeFile:Short[] = New Short [MAX_PATH] End Function Main () Local proc:PROCESSENTRY32 = New PROCESSENTRY32 proc.dwSize = libc.sizeof (PROCESSENTRY32) End

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30

#Import "<std>"   #Import "<windows.h>" #Import "<tlhelp32.h>"   Using std..   Const MAX_PATH:Int   Struct PROCESSENTRY32 FIeld dwSize:Uint FIeld cntUsage:Uint FIeld th32ProcessID:Uint Field th32DefaultHeapID:ULong Ptr FIeld th32ModuleID:Uint FIeld cntThreads:Uint FIeld th32ParentProcessID:UInt Field pcPriClassBase:Long FIeld dwFlags:UInt Field szExeFile:Short[] = New Short [MAX_PATH] End   Function Main () Local proc:PROCESSENTRY32 = New PROCESSENTRY32 proc.dwSize = libc.sizeof (PROCESSENTRY32) End

(Tried hard-coding the value of MAX_PATH here — surprised that builds.)

This was just me trying to figure out the Struct array syntax, but once I stick it into an Extern block, it fails to even parse, with “Error : Expecting string literal” on this line:

Monkey

Field szExeFile:Short[] = New Short[MAX_PATH]

1	Field szExeFile:Short[] = New Short[MAX_PATH]

My understanding is that just declaring the const in an Extern block will pick up the value from the .h imports, is that right?

Monkey

#Import "<std>" #Import "<windows.h>" #Import "<tlhelp32.h>" Using std.. Extern Const MAX_PATH:Int Struct PROCESSENTRY32 FIeld dwSize:Uint FIeld cntUsage:Uint FIeld th32ProcessID:Uint Field th32DefaultHeapID:ULong Ptr FIeld th32ModuleID:Uint FIeld cntThreads:Uint FIeld th32ParentProcessID:UInt Field pcPriClassBase:Long FIeld dwFlags:UInt Field szExeFile:Short[] = New Short[MAX_PATH] End Public Function Main () Local proc:PROCESSENTRY32 = New PROCESSENTRY32 proc.dwSize = libc.sizeof (PROCESSENTRY32) End

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34

#Import "<std>"   #Import "<windows.h>" #Import "<tlhelp32.h>"   Using std..   Extern   Const MAX_PATH:Int Struct PROCESSENTRY32 FIeld dwSize:Uint FIeld cntUsage:Uint FIeld th32ProcessID:Uint Field th32DefaultHeapID:ULong Ptr FIeld th32ModuleID:Uint FIeld cntThreads:Uint FIeld th32ParentProcessID:UInt Field pcPriClassBase:Long FIeld dwFlags:UInt Field szExeFile:Short[] = New Short[MAX_PATH] End   Public   Function Main () Local proc:PROCESSENTRY32 = New PROCESSENTRY32 proc.dwSize = libc.sizeof (PROCESSENTRY32) End

(Besides the syntax/apparent parse/run errors, do I need to declare an external struct like this, ie. am I going about this the right way?)

[DruggedBunnyParticipant]

Oh, PROCESSENTRY32 — Short was my best guess for a TCHAR!

MSDN

[Mark SiblyKeymaster]

You can’t use mx2 arrays in an extern like that, because an mx2 array is NOT the same as a C array.

The easiest way to handle C arrays is to use a Ptr instead of an array (in C, arrays ARE pointers), eg: change ‘int[32]’ to ‘Int Ptr’. You’ll still be able to access it via [] etc, but be aware that the compiler wont be able to sanity check static array sizes.

As per the excellent unicode-for-all doc, I would suggest explicitly using Struct PROCESSENTRY32W, ie: the wide char version where TCHAR is ushort, something like…

Monkey

Extern Struct PROCESSENTRY32W Field dwSize:UInt Field cntUsage:UInt ... Field szExeFile:UShort Ptr End Function Main() Local proc:PROCESSENTRY32W proc.dwSize=libs.sizeof(proc) ... End

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Extern   Struct PROCESSENTRY32W    Field dwSize:UInt    Field cntUsage:UInt    ...    Field szExeFile:UShort Ptr End   Function Main()    Local proc:PROCESSENTRY32W    proc.dwSize=libs.sizeof(proc)    ... End

You don’t need to ‘New’ structs although it doesn’t really hurt.

[DruggedBunnyParticipant]

OK, will give that a shot later. Didn’t even realise there were W versions of Win32 structs!

[DruggedBunnyParticipant]

This revised version gives me “Translator.Trans() Internal Error”:

Monkey

#Import "<std>" #Import "<windows.h>" #Import "<tlhelp32.h>" Using std.. Extern Const MAX_PATH:Int Struct PROCESSENTRY32W Field dwSize:UInt Field cntUsage:UInt Field th32ProcessID:UInt Field th32DefaultHeapID:ULong Ptr Field th32ModuleID:UInt Field cntThreads:UInt Field th32ParentProcessID:UInt Field pcPriClassBase:Long Field dwFlags:UInt Field szExeFile:UShort Ptr End Public Function Main () Local proc:PROCESSENTRY32W = New PROCESSENTRY32W proc.dwSize = libc.sizeof (PROCESSENTRY32W) End

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35

#Import "<std>" #Import "<windows.h>" #Import "<tlhelp32.h>" Using std.. Extern Const MAX_PATH:Int Struct PROCESSENTRY32W   Field dwSize:UInt Field cntUsage:UInt Field th32ProcessID:UInt Field th32DefaultHeapID:ULong Ptr Field th32ModuleID:UInt Field cntThreads:UInt Field th32ParentProcessID:UInt Field pcPriClassBase:Long Field dwFlags:UInt Field szExeFile:UShort Ptr End Public Function Main () Local proc:PROCESSENTRY32W = New PROCESSENTRY32W proc.dwSize = libc.sizeof (PROCESSENTRY32W) End

This says…

Monkey

Mx2cc version 1.1.09 ***** Making app 'I:/SpiderOak/DevTools/Monkey2/monkey2-develop/modules/mojo3d/tests/win32 proc32.monkey2' (windows release x86 gcc) ***** Parsing... Semanting... Translating... ? [?] : Error : Translator.Trans() Internal Error ***** Uncaught Monkey 2 Throwable ***** Done.

1 2 3 4 5 6 7 8 9 10 11 12 13 14

Mx2cc version 1.1.09   ***** Making app 'I:/SpiderOak/DevTools/Monkey2/monkey2-develop/modules/mojo3d/tests/win32 proc32.monkey2' (windows release x86 gcc) *****   Parsing... Semanting... Translating...   ? [?] : Error : Translator.Trans() Internal Error   ***** Uncaught Monkey 2 Throwable *****     Done.

Turns out that’s the error the first version gave, it was just that the output was hidden.

I get various different internal errors depending on what I do in Main with that last code…

This builds OK, but obviously does nothing:

Monkey

Function Main () Local proc:PROCESSENTRY32W End

1 2 3 4

Function Main () Local proc:PROCESSENTRY32W End

New’ing produces a different error:

Monkey

Function Main () Local proc:PROCESSENTRY32W = New PROCESSENTRY32W End

1 2 3 4

Function Main () Local proc:PROCESSENTRY32W = New PROCESSENTRY32W End

Output for this is:

Monkey

Mx2cc version 1.1.09 ***** Making app 'I:/SpiderOak/DevTools/Monkey2/monkey2-develop/modules/mojo3d/tests/win32 proc32.monkey2' (windows release x86 gcc) ***** Parsing... Semanting... Translating... Compiling... Build error: System command failed: g++ -c -std=c++11 -D_WIN32_WINNT=0x0603 -m32 -O3 -DNDEBUG -I"I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/modules/" -I"I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/modules/monkey/native" -I"I:/SpiderOak/DevTools/Monkey2/monkey2-develop/modules/mojo3d/tests/" -DBB_NEWREFLECTION -I"I:/SpiderOak/DevTools/Monkey2/monkey2-develop/modules/mojo3d/tests/win32 proc32.buildv1.1.09/windows_release/build/" -o "I:/SpiderOak/DevTools/Monkey2/monkey2-develop/modules/mojo3d/tests/win32 proc32.buildv1.1.09/windows_release/build/win32_04proc32_0win32_04proc32.cpp.o" "I:/SpiderOak/DevTools/Monkey2/monkey2-develop/modules/mojo3d/tests/win32 proc32.buildv1.1.09/windows_release/src/win32_4proc32_win32_4proc32.cpp" I:/SpiderOak/DevTools/Monkey2/monkey2-develop/modules/mojo3d/tests/win32 proc32.buildv1.1.09/windows_release/src/win32_4proc32_win32_4proc32.cpp: In function 'void bbMain()': I:/SpiderOak/DevTools/Monkey2/monkey2-develop/modules/mojo3d/tests/win32 proc32.buildv1.1.09/windows_release/src/win32_4proc32_win32_4proc32.cpp:13:52: error: cannot convert 'bbNullCtor_t' to 'DWORD {aka long unsigned int}' in initialization PROCESSENTRY32W l_proc=PROCESSENTRY32W{bbNullCtor}; ^ ***** Fatal mx2cc error ***** Internal mx2cc build error

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26

Mx2cc version 1.1.09   ***** Making app 'I:/SpiderOak/DevTools/Monkey2/monkey2-develop/modules/mojo3d/tests/win32 proc32.monkey2' (windows release x86 gcc) *****   Parsing... Semanting... Translating... Compiling... Build error: System command failed:   g++ -c  -std=c++11 -D_WIN32_WINNT=0x0603 -m32 -O3 -DNDEBUG -I"I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/modules/" -I"I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/modules/monkey/native" -I"I:/SpiderOak/DevTools/Monkey2/monkey2-develop/modules/mojo3d/tests/" -DBB_NEWREFLECTION -I"I:/SpiderOak/DevTools/Monkey2/monkey2-develop/modules/mojo3d/tests/win32 proc32.buildv1.1.09/windows_release/build/" -o "I:/SpiderOak/DevTools/Monkey2/monkey2-develop/modules/mojo3d/tests/win32 proc32.buildv1.1.09/windows_release/build/win32_04proc32_0win32_04proc32.cpp.o" "I:/SpiderOak/DevTools/Monkey2/monkey2-develop/modules/mojo3d/tests/win32 proc32.buildv1.1.09/windows_release/src/win32_4proc32_win32_4proc32.cpp"   I:/SpiderOak/DevTools/Monkey2/monkey2-develop/modules/mojo3d/tests/win32 proc32.buildv1.1.09/windows_release/src/win32_4proc32_win32_4proc32.cpp: In function 'void bbMain()':   I:/SpiderOak/DevTools/Monkey2/monkey2-develop/modules/mojo3d/tests/win32 proc32.buildv1.1.09/windows_release/src/win32_4proc32_win32_4proc32.cpp:13:52: error: cannot convert 'bbNullCtor_t' to 'DWORD {aka long unsigned int}' in initialization      PROCESSENTRY32W l_proc=PROCESSENTRY32W{bbNullCtor};                                                       ^       ***** Fatal mx2cc error *****   Internal mx2cc build error

… and adding the sizeof line gives the “Translator.Trans() Internal Error”:

Monkey

Function Main () Local proc:PROCESSENTRY32W = New PROCESSENTRY32W proc.dwSize = libc.sizeof (PROCESSENTRY32W) End

1 2 3 4 5

Function Main () Local proc:PROCESSENTRY32W = New PROCESSENTRY32W proc.dwSize = libc.sizeof (PROCESSENTRY32W) End

Tried without New as well, but assume that is needed… same Trans() error anyway…

Monkey

Function Main () Local proc:PROCESSENTRY32W proc.dwSize = libc.sizeof (PROCESSENTRY32W) End

1 2 3 4 5

Function Main () Local proc:PROCESSENTRY32W proc.dwSize = libc.sizeof (PROCESSENTRY32W) End

[Mark SiblyKeymaster]

The argument for sizeof  should be a value not a type, eg: libc.sizeof( proc ), but that error isn’t exactly helpful, will fix.

[DruggedBunnyParticipant]

Cool, I had to not-New it, too (suspected so), but it’s working now with:

Monkey

Function Main () Local proc:PROCESSENTRY32W proc.dwSize = libc.sizeof (proc) Print proc.dwSize End

1 2 3 4 5 6

Function Main () Local proc:PROCESSENTRY32W proc.dwSize = libc.sizeof (proc) Print proc.dwSize End

Thanks!

[Author]

Posts