参考

{% collapse title=”doge_code.c” %}

  1. #include "mpc.h"
  3. int main(int argc, char** argv) {
  5.   /* Build a parser 'Adjective' to recognize descriptions */
  6.   mpc_parser_t* Adjective = mpc_or(4, 
  7.     mpc_sym("wow"), mpc_sym("many"),
  8.     mpc_sym("so"),  mpc_sym("such")
  9.   );
  11.   /* Build a parser 'Noun' to recognize things */
  12.   mpc_parser_t* Noun = mpc_or(5,
  13.     mpc_sym("lisp"), mpc_sym("language"),
  14.     mpc_sym("book"), mpc_sym("build"), 
  15.     mpc_sym("c")
  16.   );
  18.   mpc_parser_t* Phrase = mpc_and(2, mpcf_strfold, 
  19.     Adjective, Noun, free);
  21.   mpc_parser_t* Doge = mpc_many(mpcf_strfold, Phrase);
  23.   /* Do some parsing here... */
  25.   mpc_delete(Doge);
  27.   return 0;
  29. }

{% endcollapse %}

{% collapse title=”doge_grammar.c” %}

  1. #include "mpc.h"
  3. int main(int argc, char** argv) {
  5.   mpc_parser_t* Adjective = mpc_new("adjective");
  6.   mpc_parser_t* Noun      = mpc_new("noun");
  7.   mpc_parser_t* Phrase    = mpc_new("phrase");
  8.   mpc_parser_t* Doge      = mpc_new("doge");
  10.   mpca_lang(MPCA_LANG_DEFAULT,
  11.     "                                           \
  12.       adjective : \"wow\" | \"many\"            \
  13.                 |  \"so\" | \"such\";           \
  14.       noun      : \"lisp\" | \"language\"       \
  15.                 | \"book\" | \"build\" | \"c\"; \
  16.       phrase    : <adjective> <noun>;           \
  17.       doge      : <phrase>*;                    \
  18.     ",
  19.     Adjective, Noun, Phrase, Doge);
  21.   /* Do some parsing here... */
  23.   mpc_cleanup(4, Adjective, Noun, Phrase, Doge);
  25.   return 0;
  27. }

{% endcollapse %}