andy/mpc
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Linux Merge

Browse Source
This commit is contained in:
Daniel Holden
2013-09-24 11:38:27 +01:00
parent 48812155a1
commit b02c6ffdfe
4 changed files with 6 additions and 111 deletions
Download Patch File Download Diff File Expand all files Collapse all files

38
tests/ident.c
View File

@@ -1,38 +0,0 @@
#include "../mpc.h"
#include <stdlib.h>
#include <string.h>
static bool string_eq(void* x, void* y) { return (strcmp(x, y) == 0); }
static void string_print(void* x) { printf("'%s'", (char*)x); }
bool suite_ident(void) {
/* ^[a-zA-Z_][a-zA-Z0-9_]*$ */
mpc_parser_t* Ident = mpc_new();
mpc_define(Ident, mpc_ends(
mpc_also(
mpc_either(mpc_alpha(), mpc_underscore()),
mpc_many1(mpc_or(3, mpc_alpha(), mpc_underscore(), mpc_digit()), mpcf_strfold),
free, mpcf_strfold
),
free)
);
mpc_print(Ident);
mpc_test(Ident, "test", "test", string_eq, free, string_print);
mpc_test(Ident, " blah", "", string_eq, free, string_print);
mpc_test(Ident, "anoth21er", "anoth21er", string_eq, free, string_print);
mpc_test(Ident, "du__de", "du__de", string_eq, free, string_print);
mpc_test(Ident, "some spaces", "", string_eq, free, string_print);
mpc_test(Ident, "", "", string_eq, free, string_print);
mpc_test(Ident, "18nums", "", string_eq, free, string_print);
mpc_undefine(Ident);
mpc_delete(Ident);
return true;
}

61
tests/math.c
View File

@@ -1,61 +0,0 @@
#include "../mpc.h"
#include <stdlib.h>
#include <string.h>
static bool int_eq(void* x, void* y) {
return (*(int*)x == *(int*)y);
}
static void int_print(void* x) {
printf("'%i'", *((int*)x));
}
bool suite_math(void) {
mpc_parser_t* Expr = mpc_new();
mpc_parser_t* Factor = mpc_new();
mpc_parser_t* Term = mpc_new();
mpc_parser_t* Maths = mpc_new();
mpc_define(Expr, mpc_either(
mpc_and(3, mpcf_maths, Factor, mpc_oneof("*/"), Factor, free, free),
Factor
));
mpc_define(Factor, mpc_either(
mpc_and(3, mpcf_maths, Term, mpc_oneof("+-"), Term, free, free),
Term
));
mpc_define(Term, mpc_either(
mpc_int(),
mpc_parens(Expr, free)
));
mpc_define(Maths, mpc_ends(Expr, free));
mpc_print(Expr);
mpc_print(Factor);
mpc_print(Term);
mpc_print(Maths);
mpc_test(Maths, "1", (int[]){ 1 }, int_eq, free, int_print);
mpc_test(Maths, "(5)", (int[]){ 5 }, int_eq, free, int_print);
mpc_test(Maths, "(4*2)+5", (int[]){ 13 }, int_eq, free, int_print);
mpc_test(Maths, "a", (int[]){ 0 }, int_eq, free, int_print);
mpc_test(Maths, "2b+4", (int[]){ 2 }, int_eq, free, int_print);
mpc_undefine(Expr);
mpc_undefine(Factor);
mpc_undefine(Term);
mpc_undefine(Maths);
mpc_delete(Expr);
mpc_delete(Factor);
mpc_delete(Term);
mpc_delete(Maths);
return true;
}