examples/quine.c

Rama main · réplica de lectura del repositorio original.

// This C* code outputs its own source code: quine.c in C*
void init_library();
void print(uint64_t* s);
void print_integer(uint64_t i);
void print_string(uint64_t* s);
void println();
uint64_t main() {
  uint64_t* source;
  uint64_t i;
  init_library();
  source = malloc(41*sizeof(uint64_t));
  *(source + 0) = (uint64_t) "// This C* code outputs its own source code: quine.c in C*";
  *(source + 1) = (uint64_t) "void init_library();";
  *(source + 2) = (uint64_t) "void print(uint64_t* s);";
  *(source + 3) = (uint64_t) "void print_integer(uint64_t i);";
  *(source + 4) = (uint64_t) "void print_string(uint64_t* s);";
  *(source + 5) = (uint64_t) "void println();";
  *(source + 6) = (uint64_t) "uint64_t main() {";
  *(source + 7) = (uint64_t) "  uint64_t* source;";
  *(source + 8) = (uint64_t) "  uint64_t i;";
  *(source + 9) = (uint64_t) "  init_library();";
  *(source + 10) = (uint64_t) "  source = malloc(41*sizeof(uint64_t));";
  *(source + 11) = (uint64_t) "  // printing source code before stored code";
  *(source + 12) = (uint64_t) "  i = 0;";
  *(source + 13) = (uint64_t) "  while (i < 11) {";
  *(source + 14) = (uint64_t) "    print(*(source + i));";
  *(source + 15) = (uint64_t) "    println();";
  *(source + 16) = (uint64_t) "    i = i + 1;";
  *(source + 17) = (uint64_t) "  }";
  *(source + 18) = (uint64_t) "  // printing stored source code";
  *(source + 19) = (uint64_t) "  i = 0;";
  *(source + 20) = (uint64_t) "  while (i < 41) {";
  *(source + 21) = (uint64_t) "    print(*(source + 38));";
  *(source + 22) = (uint64_t) "    print_integer(i);";
  *(source + 23) = (uint64_t) "    print(*(source + 39));";
  *(source + 24) = (uint64_t) "    print_string(*(source + i));";
  *(source + 25) = (uint64_t) "    print(*(source + 40));";
  *(source + 26) = (uint64_t) "    println();";
  *(source + 27) = (uint64_t) "    i = i + 1;";
  *(source + 28) = (uint64_t) "  }";
  *(source + 29) = (uint64_t) "  // printing source code after stored code";
  *(source + 30) = (uint64_t) "  i = 11;";
  *(source + 31) = (uint64_t) "  while (i < 38) {";
  *(source + 32) = (uint64_t) "    print(*(source + i));";
  *(source + 33) = (uint64_t) "    println();";
  *(source + 34) = (uint64_t) "    i = i + 1;";
  *(source + 35) = (uint64_t) "  }";
  *(source + 36) = (uint64_t) "  return 0;";
  *(source + 37) = (uint64_t) "}";
  *(source + 38) = (uint64_t) "  *(source + ";
  *(source + 39) = (uint64_t) ") = (uint64_t) ";
  *(source + 40) = (uint64_t) ";";
  // printing source code before stored code
  i = 0;
  while (i < 11) {
    print(*(source + i));
    println();
    i = i + 1;
  }
  // printing stored source code
  i = 0;
  while (i < 41) {
    print(*(source + 38));
    print_integer(i);
    print(*(source + 39));
    print_string(*(source + i));
    print(*(source + 40));
    println();
    i = i + 1;
  }
  // printing source code after stored code
  i = 11;
  while (i < 38) {
    print(*(source + i));
    println();
    i = i + 1;
  }
  return 0;
}