Simple Win32 API call attempt

[DruggedBunnyParticipant]

Hi all,

Just having a little play with mx2, was hoping to get a really simple Win32 API call working, but it’s falling down somewhere… but I don’t know if I’m approaching it correctly…

Monkey

#Import "<libuser32.a>" Extern Function MessageBoxA:Int (hWnd:Int, lpText:CString, lpCaption:CString, uType:Int) Public Function Main:Void () MessageBoxA (Null, "Test", "Test", 0) End

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

#Import "<libuser32.a>"   Extern       Function MessageBoxA:Int (hWnd:Int, lpText:CString, lpCaption:CString, uType:Int)   Public   Function Main:Void ()       MessageBoxA (Null, "Test", "Test", 0)   End

This fails with:

Monkey

Mx2cc version 1.1.04 ***** Building app 'I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/tmp/untitled1.monkey2' ***** Parsing... Semanting... Translating... Compiling... Build error: System command 'g++ -I"I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/modules/" -I"I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/modules/monkey/native" -I"I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/tmp/" -std=c++11 -m32 -c -o "I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/tmp/untitled1.buildv1.1.04/windows_debug/build/_1src_2untitled1_0untitled1.cpp.o" "I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/tmp/untitled1.buildv1.1.04/windows_debug/src/untitled1_untitled1.cpp"' failed. g++ -I"I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/modules/" -I"I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/modules/monkey/native" -I"I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/tmp/" -std=c++11 -m32 -c -o "I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/tmp/untitled1.buildv1.1.04/windows_debug/build/_1src_2untitled1_0untitled1.cpp.o" "I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/tmp/untitled1.buildv1.1.04/windows_debug/src/untitled1_untitled1.cpp" I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/tmp/untitled1.buildv1.1.04/windows_debug/src/untitled1_untitled1.cpp: In function 'void bbMain()': I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/tmp/untitled1.buildv1.1.04/windows_debug/src/untitled1_untitled1.cpp:13:87: error: 'MessageBoxA' was not declared in this scope MessageBoxA(0,bbCString(bbString(L"Test",4)),bbCString(bbString(L"Test",4)),bbInt(0)); ^ ***** 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.04   ***** Building app 'I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/tmp/untitled1.monkey2' *****   Parsing... Semanting... Translating... Compiling... Build error: System command 'g++ -I"I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/modules/" -I"I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/modules/monkey/native" -I"I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/tmp/" -std=c++11 -m32 -c -o "I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/tmp/untitled1.buildv1.1.04/windows_debug/build/_1src_2untitled1_0untitled1.cpp.o" "I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/tmp/untitled1.buildv1.1.04/windows_debug/src/untitled1_untitled1.cpp"' failed.   g++ -I"I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/modules/" -I"I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/modules/monkey/native" -I"I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/tmp/" -std=c++11 -m32 -c -o "I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/tmp/untitled1.buildv1.1.04/windows_debug/build/_1src_2untitled1_0untitled1.cpp.o" "I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/tmp/untitled1.buildv1.1.04/windows_debug/src/untitled1_untitled1.cpp"   I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/tmp/untitled1.buildv1.1.04/windows_debug/src/untitled1_untitled1.cpp: In function 'void bbMain()':   I:/SpiderOak/DevTools/Monkey2/Monkey2-v1.1.04/tmp/untitled1.buildv1.1.04/windows_debug/src/untitled1_untitled1.cpp:13:87: error: 'MessageBoxA' was not declared in this scope      MessageBoxA(0,bbCString(bbString(L"Test",4)),bbCString(bbString(L"Test",4)),bbInt(0));                                                                                          ^       ***** Fatal mx2cc error *****   Internal mx2cc build error

After much playing about, I think it’s picking everything up, as in the import seems to be working (various alternatives gave import errors before), the Extern appears OK to me, assuming my Ints translate to the native parameters — which looks to be happening based on “MessageBoxA(0,bbCString(bbString(L”Test”,4)),bbCString(bbString(L”Test”,4)),bbInt(0));”.

The error seems to suggest that Main can’t see MessageBoxA, which I don’t really understand.

Can’t find any search results that cover this particular use of Extern…

Not sure if this is a bug, or if I’m just missing something important/doing something stupid?

[Mark SiblyKeymaster]

Close…you’re just missing  #Import “<windows.h>”, ie:

Monkey

#Import "<libuser32.a>" #Import "<windows.h>" Extern Function MessageBoxA:Int (hWnd:Int, lpText:CString, lpCaption:CString, uType:Int) Public Function Main:Void () MessageBoxA (Null, "Test", "Test", 0) End

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

#Import "<libuser32.a>"   #Import "<windows.h>" Extern     Function MessageBoxA:Int (hWnd:Int, lpText:CString, lpCaption:CString, uType:Int) Public Function Main:Void ()     MessageBoxA (Null, "Test", "Test", 0) End

[DruggedBunnyParticipant]

Ah, interesting! Thanks, Mark!

[DruggedBunnyParticipant]

This no longer builds here (your code), gving a load of output I don’t really understand! Just ran into it while trying to do something else (around 6 hours trying to debug Ted2Go debugger crashes!)…

Monkey

Mx2cc version 1.1.09 ***** Making app 'I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/tmp/untitled2.monkey2' (windows debug x86 gcc) ***** Parsing... Semanting... Translating... Compiling... Build error: System command failed: g++ -c -std=c++11 -D_WIN32_WINNT=0x0603 -m32 -Os -I"I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/modules/" -I"I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/modules/monkey/native" -I"I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/tmp/" -DBB_NEWREFLECTION -I"I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/tmp/untitled2.buildv1.1.09/windows_debug/build/" -o "I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/tmp/untitled2.buildv1.1.09/windows_debug/build/untitled2_0untitled2.cpp.o" "I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/tmp/untitled2.buildv1.1.09/windows_debug/src/untitled2_untitled2.cpp" I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/tmp/untitled2.buildv1.1.09/windows_debug/src/untitled2_untitled2.cpp: In function 'void bbMain()': I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/tmp/untitled2.buildv1.1.09/windows_debug/src/untitled2_untitled2.cpp:15:15: error: invalid conversion from 'bbInt {aka int}' to 'HWND {aka HWND__*}' [-fpermissive] MessageBoxA(bbInt(0),bbCString(bbString(L"Test",4)),bbCString(bbString(L"Test",4)),bbInt(0)); ^~~~~~~~ In file included from I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/devtools/i686-6.2.0-posix-dwarf-rt_v5-rev1/mingw32/i686-w64-mingw32/include/windows.h:72:0, from I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/tmp/untitled2.buildv1.1.09/windows_debug/include/untitled2_untitled2.h:6, from I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/tmp/untitled2.buildv1.1.09/windows_debug/src/untitled2_untitled2.cpp:2: I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/devtools/i686-6.2.0-posix-dwarf-rt_v5-rev1/mingw32/i686-w64-mingw32/include/winuser.h:3563:25: note: initializing argument 1 of 'int MessageBoxA(HWND, LPCSTR, LPCSTR, UINT)' WINUSERAPI int WINAPI MessageBoxA(HWND hWnd,LPCSTR lpText,LPCSTR lpCaption,UINT uType); ^~~~~~~~~~~ ***** 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 27 28 29 30 31 32 33 34 35 36 37 38

Mx2cc version 1.1.09   ***** Making app 'I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/tmp/untitled2.monkey2' (windows debug x86 gcc) *****   Parsing... Semanting... Translating... Compiling... Build error: System command failed:   g++ -c  -std=c++11 -D_WIN32_WINNT=0x0603 -m32 -Os -I"I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/modules/" -I"I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/modules/monkey/native" -I"I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/tmp/" -DBB_NEWREFLECTION -I"I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/tmp/untitled2.buildv1.1.09/windows_debug/build/" -o "I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/tmp/untitled2.buildv1.1.09/windows_debug/build/untitled2_0untitled2.cpp.o" "I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/tmp/untitled2.buildv1.1.09/windows_debug/src/untitled2_untitled2.cpp"   I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/tmp/untitled2.buildv1.1.09/windows_debug/src/untitled2_untitled2.cpp: In function 'void bbMain()':   I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/tmp/untitled2.buildv1.1.09/windows_debug/src/untitled2_untitled2.cpp:15:15: error: invalid conversion from 'bbInt {aka int}' to 'HWND {aka HWND__*}' [-fpermissive]      MessageBoxA(bbInt(0),bbCString(bbString(L"Test",4)),bbCString(bbString(L"Test",4)),bbInt(0));                  ^~~~~~~~   In file included from I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/devtools/i686-6.2.0-posix-dwarf-rt_v5-rev1/mingw32/i686-w64-mingw32/include/windows.h:72:0,                    from I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/tmp/untitled2.buildv1.1.09/windows_debug/include/untitled2_untitled2.h:6,                    from I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/tmp/untitled2.buildv1.1.09/windows_debug/src/untitled2_untitled2.cpp:2:   I:/SpiderOak/DevTools/Monkey2/mx2builder/monkey2/devtools/i686-6.2.0-posix-dwarf-rt_v5-rev1/mingw32/i686-w64-mingw32/include/winuser.h:3563:25: note:   initializing argument 1 of 'int MessageBoxA(HWND, LPCSTR, LPCSTR, UINT)'      WINUSERAPI int WINAPI MessageBoxA(HWND hWnd,LPCSTR lpText,LPCSTR lpCaption,UINT uType);                            ^~~~~~~~~~~       ***** Fatal mx2cc error *****   Internal mx2cc build error

I’m on latest dev, though last one fails too.

[DruggedBunnyParticipant]

Got this working using Diffrenzy’s HWND hack here.

I did try Aliasing it as Void Ptr, which I thought would work, as HWND is a HANDLE, which is a void pointer according to Windows Data Types

Monkey

#Import "<libuser32.a>" #Import "<windows.h>" Extern Struct HWND__ End Alias HWND:HWND__ Ptr Function MessageBoxA:Int (hWnd:HWND, lpText:CString, lpCaption:CString, uType:Int) Public Function Main:Void () MessageBoxA (Null, "Test", "Test", 0) End

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

#Import "<libuser32.a>" #Import "<windows.h>"   Extern   Struct HWND__ End Alias HWND:HWND__ Ptr     Function MessageBoxA:Int (hWnd:HWND, lpText:CString, lpCaption:CString, uType:Int) Public Function Main:Void ()     MessageBoxA (Null, "Test", "Test", 0) End

[Author]

Posts