Subversion Repositories Kolibri OS

Rev

Rev 4567 | Rev 5598 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 4567 Rev 5576
Line 1... Line 1...
1 
char a_libdir[43]  = "/sys/lib/\0";
 1 
char a_libdir[43]  = "/sys/lib/\0";
Line -... Line 2...
- 
 
 2 
 
- 
 
 3 
:inline void error_init(dword text)
- 
 
 4 
{
- 
 
 5 
	dword l,ll;
- 
 
 6 
	dword TEXT_ERROR = malloc(1024);
- 
 
 7 
	#ifdef LANG_RUS
- 
 
 8 
		strcpy(TEXT_ERROR,"'Žè¨¡ª  ¯à¨ § £à㧪¥ ¡¨¡«¨®â¥ª¨ `");
- 
 
 9 
	#elif LANG_EST
- 
 
 10 
		strcpy(TEXT_ERROR,"'Viga teegi laadimisel `");
- 
 
 11 
	#else
- 
 
 12 
		strcpy(TEXT_ERROR,"'Error while loading library `");
- 
 
 13 
	#endif
- 
 
 14 
	ll = strlen(TEXT_ERROR);
- 
 
 15 
	strcpy(TEXT_ERROR+ll,text);
- 
 
 16 
	l = strlen(text);
- 
 
 17 
	strncpy(TEXT_ERROR+ll+l,"`' -E",4);
- 
 
 18 
	notify(TEXT_ERROR);
- 
 
 19 
	free(TEXT_ERROR);
- 
 
 20 
	ExitProcess();
- 
 
 21 
}
2 
 
 22 
 
3 
// stdcall with 1 parameter
 23 
// stdcall with 1 parameter
4 
void dll_Load() {
 24 
void dll_Load() {
5 
asm {
 25 
asm {
6 
        push    ebp
 26 
        push    ebp
Line 211... Line 231...
211 
@import_done01:
 231 
@import_done01:
212 
        IF (need_init) dll_Init (DSDWORD[EDX+4]);
 232 
        IF (need_init) dll_Init (DSDWORD[EDX+4]);
213 
        return 0;
 233 
        return 0;
214 
@exit01:
 234 
@exit01:
215 
        return -1;
 235 
        return -1;
- 
 
 236 
		//error_init(dllname);
216 
}
 237 
}
217 

            238