chiark / gitweb /
New version.
[runlisp] / bench / t.c
1 #include <stdio.h>
2
3 #if __clang__
4 #  define IMPL "Clang"
5 #elif __TINYC__
6 #  define IMPL "TCC"
7 #elif __GNUC__
8 #  define IMPL "GCC"
9 #else
10 #  define IMPL "an unknown C implementation"
11 #endif
12
13 int main(int argc, char *argv[])
14 {
15   int i;
16
17   puts("Hello from " IMPL "!");
18   printf("Script = `%s'\n", argv[0]);
19   fputs("Arguments = (", stdout);
20   for (i = 1; i < argc; i++) {
21     if (i > 1) fputs(", ", stdout);
22     printf("`%s'", argv[i]);
23   }
24   putchar(')'); putchar('\n');
25   return (0);
26 }