mdw@git.distorted.org.uk Git - runlisp/blob - 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 }