paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-12 21:49:09 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ compiled test for win32

Browse Source 
* use writeln to show the test result as well for easier manual testing

git-svn-id: trunk@14191 -
This commit is contained in:
florian 2009-11-15 20:56:18 +00:00
parent f54ea1e9f9
commit 509447c4b9
3 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
.gitattributes vendored
View File

@ -8328,6 +8328,7 @@ tests/test/cg/obj/stdint.h svneol=native#text/plain
tests/test/cg/obj/tcext3.c -text tests/test/cg/obj/tcext3.c -text
tests/test/cg/obj/tcext4.c -text tests/test/cg/obj/tcext4.c -text
tests/test/cg/obj/tcext5.c -text tests/test/cg/obj/tcext5.c -text
tests/test/cg/obj/win32/i386/cpptcl1.o -text
tests/test/cg/obj/win32/i386/ctest.o -text tests/test/cg/obj/win32/i386/ctest.o -text
tests/test/cg/obj/win32/i386/tcext3.o -text tests/test/cg/obj/win32/i386/tcext3.o -text
tests/test/cg/obj/win32/i386/tcext4.o -text tests/test/cg/obj/win32/i386/tcext4.o -text

BIN
tests/test/cg/obj/win32/i386/cpptcl1.o Normal file
View File

Binary file not shown.

1
tests/test/cg/tcppcl1.pp
View File

@ -90,6 +90,7 @@ begin
TestClass.Test26(Nil, c, 3.1416); TestClass.Test26(Nil, c, 3.1416);
except except
ExitCode := 1; ExitCode := 1;
writeln('error');
end; end;
end. end.