win32 bootstrap fixes

erg 2006-03-25 09:58:34 +00:00
parent ab97dccc66
commit d9379f9af7
3 changed files with 6 additions and 1 deletions

View File

@ -18,3 +18,4 @@ USING: alien compiler kernel parser sequences words ;
"clipboard" "clipboard"
"ui" "ui"
} [ "/contrib/win32/" swap ".factor" append3 run-resource ] each } [ "/contrib/win32/" swap ".factor" append3 run-resource ] each
compile-all

View File

@ -635,7 +635,7 @@ FUNCTION: LRESULT DefWindowProcW ( HWND hWnd, UINT Msg, WPARAM wParam, LPARAM lP
! FUNCTION: DestroyIcon ! FUNCTION: DestroyIcon
! FUNCTION: DestroyMenu ! FUNCTION: DestroyMenu
! FUNCTION: DestroyReasons ! FUNCTION: DestroyReasons
! FUNCTION: DestroyWindow FUNCTION: BOOL DestroyWindow ( HWND hWnd ) ;
! FUNCTION: DeviceEventWorker ! FUNCTION: DeviceEventWorker
! FUNCTION: DialogBoxIndirectParamA ! FUNCTION: DialogBoxIndirectParamA
! FUNCTION: DialogBoxIndirectParamAorW ! FUNCTION: DialogBoxIndirectParamAorW

View File

@ -48,6 +48,10 @@ recrossref
"x11" get [ "x11" get [
"/library/x11/load.factor" run-resource "/library/x11/load.factor" run-resource
] when ] when
windows? [
"/contrib/win32/load.factor" run-resource
] when
] when ] when
[ [