| /programs/develop/ktcc/trunk/libc/build.bat |
|---|
| 28,6 → 28,7 |
| goto :eof |
| :Compile_C |
| echo compile .c %1 |
| %CC% %CFLAGS% %1 -o "%~dpn1.o" |
| if not %errorlevel%==0 goto Error_Failed |
| set objs=%objs% "%~dpn1.o" |
| 34,6 → 35,7 |
| goto :eof |
| :Compile_Asm |
| echo compile .asm %1 |
| %ASM% %1 "%~dpn1.o" |
| if not %errorlevel%==0 goto Error_Failed |
| set objs=%objs% "%~dpn1.o" |
| 50,6 → 52,7 |
| for %%f in ("%%a\*.asm") do call :Compile_Asm "%%f" |
| for %%f in ("%%a\*.c") do call :Compile_C "%%f" |
| ) |
| echo calling AR |
| %AR% -ru %LIBNAME% %objs% |
| if not %errorlevel%==0 goto Error_Failed |
| goto Exit_OK |
| /programs/develop/ktcc/trunk/libc/kolibrisys/cofflib.asm |
|---|
| 31,8 → 31,9 |
| xor eax,eax |
| mov al,[ecx] |
| test al,al |
| jz exit_check_simbol |
| ; siemargl moved to post-check |
| ; test al,al |
| ; jz exit_check_simbol |
| xor edx,edx |
| mov dl,[esi] |
| 41,6 → 42,8 |
| add edi,1 |
| jmp exit_check_simbol |
| simbols_equvalent: |
| test al,al |
| jz exit_check_simbol |
| ;pushad |
| /programs/develop/ktcc/trunk/libc/stdio/fwrite.c |
|---|
| 1,6 → 1,8 |
| #include <stdio.h> |
| #include <kolibrisys.h> |
| // dont support return partial writing when fail |
| // only 32-bit filesize |
| int fwrite(void *buffer,int size,int count,FILE* file) |
| { |
| dword res; |
| 56,8 → 58,7 |
| if (res==0) |
| { |
| file->filepos+=fullsize; |
| fullsize=fullsize/count; |
| return(fullsize); |
| return(count); |
| } else |
| { |
| errno = -res; |
| 70,8 → 71,7 |
| if (res==0) |
| { |
| file->filepos+=fullsize; |
| fullsize=fullsize/count; |
| return(fullsize); |
| return(count); |
| } else |
| { |
| errno = -res; |