42c1b6ba38
The tests are taken almost verbatim from the open source project PicoC. It can be found at https://code.google.com/p/picoc/. The tests range from very simple/trivial ones to more complicated. My view is that the more tests the better. Without tests like this I was very reluctant to make any changes to tcc for the fear of breaking things. The tests pass on Win32, OSX, Linux x86 and x86_64. One or two tests fail on each platform due to differences in the runtime library.
46 lines
991 B
C
46 lines
991 B
C
#include <stdio.h>
|
|
#include <string.h>
|
|
#include <strings.h>
|
|
|
|
int main()
|
|
{
|
|
char a[10];
|
|
|
|
strcpy(a, "hello");
|
|
printf("%s\n", a);
|
|
|
|
strncpy(a, "gosh", 2);
|
|
printf("%s\n", a);
|
|
|
|
printf("%d\n", strcmp(a, "apple") > 0);
|
|
printf("%d\n", strcmp(a, "goere") > 0);
|
|
printf("%d\n", strcmp(a, "zebra") < 0);
|
|
|
|
printf("%d\n", strlen(a));
|
|
|
|
strcat(a, "!");
|
|
printf("%s\n", a);
|
|
|
|
printf("%d\n", strncmp(a, "apple", 2) > 0);
|
|
printf("%d\n", strncmp(a, "goere", 2) == 0);
|
|
printf("%d\n", strncmp(a, "goerg", 2) == 0);
|
|
printf("%d\n", strncmp(a, "zebra", 2) < 0);
|
|
|
|
printf("%s\n", index(a, 'o'));
|
|
printf("%s\n", rindex(a, 'l'));
|
|
printf("%d\n", rindex(a, 'x') == NULL);
|
|
|
|
memset(&a[1], 'r', 4);
|
|
printf("%s\n", a);
|
|
|
|
memcpy(&a[2], a, 2);
|
|
printf("%s\n", a);
|
|
|
|
printf("%d\n", memcmp(a, "apple", 4) > 0);
|
|
printf("%d\n", memcmp(a, "grgr", 4) == 0);
|
|
printf("%d\n", memcmp(a, "zebra", 4) < 0);
|
|
|
|
return 0;
|
|
}
|
|
|
|
/* vim: set expandtab ts=4 sw=3 sts=3 tw=80 :*/
|