BEGIN {
  print "#include <string.h>"
  print "#include \"symbols.h\""
  print
}

#FIXME: Is there a way to capture subexpression in awk? The following gsub is
#       kind of ugly
/QUIZ_CASE\(([a-z0-9_]+)\)/ { gsub(/(QUIZ_CASE\()|(\))/, "", $1); tests = tests "quiz_case_" $1 "," }

END {
  declarations = tests;
  gsub(/quiz_case/, "void quiz_case", declarations);
  gsub(/,/, "();\n", declarations);
  print declarations;

  symbols = tests;
  print "QuizCase quiz_cases[] = {";
  gsub(/quiz_case/, "  quiz_case", symbols);
  gsub(/,/, ",\n", symbols);
  symbols = symbols "  NULL"
  print symbols;
  print "};"
  print ""

  names = tests;
  print "char * quiz_case_names[] = {";
  gsub(/quiz_case_/, "  \"", names);
  gsub(/,/, "\",\n", names);
  names = names "  NULL"
  print names;
  print "};"
}