写了一个计算四则混合运算的小程序，大家来评审一下 ^_^ - Chinaunix

#include <stdio.h>
#include <stdlib.h>
#include <setjmp.h>
#include <math.h>
typedef enum BinOpr {
OP_ADD, OP_SUB, OP_MUL, OP_DIV, OP_MOD, OP_POW, OP_NON
} BinOpr;
static struct { int left, right; } binop_prio[] = {
{6, 6}, {6, 6}, {7, 7}, {7, 7}, {7, 7}, {10,9},
};
#define UNARY_PRIO 8
static BinOpr get_binop(const char **s) {
switch (**s) {
case '+': ++*s; return OP_ADD;
case '-': ++*s; return OP_SUB;
case '*': ++*s; return OP_MUL;
case '/': ++*s; return OP_DIV;
case '%': ++*s; return OP_MOD;
case '^': ++*s; return OP_POW;
default: return OP_NON;
}
}
static double doexpr(int op, double a, double b) {
switch (op) {
case OP_ADD: return a+b;
case OP_SUB: return a-b;
case OP_MUL: return a*b;
case OP_DIV: return a/b;
case OP_MOD: return a-floor(a/b)*b;
case OP_POW: return pow(a, b);
default: return 0;
}
}
typedef struct ExprContext {
jmp_buf jbuf;
const char *errmsg, *s;
BinOpr op;
} Expr;
static double error(Expr *e, const char *msg) {
e->errmsg = msg;
longjmp(e->jbuf, 1);
}
static double expr(Expr *e, int limit) {
double n;
BinOpr op;
if (*e->s == '-') {
++e->s;
n = -expr(e, UNARY_PRIO);
}
else if (*e->s == '(') {
++e->s;
n = expr(e, 0);
if (*e->s++ != ')') error(e, "')' expected");
}
else {
const char *s = e->s;
n = strtod(s, (char**)&e->s);
if (e->s == s) error(e, "'number' expected");
}
op = get_binop(&e->s);
while (op != OP_NON && binop_prio[op].left > limit) {
n = doexpr(op, n, expr(e, binop_prio[op].right));
op = e->op;
}
e->op = op;
return n;
}
double calc(const char *s, const char **perr) {
Expr e;
e.s = s;
e.errmsg = NULL;
if (setjmp(e.jbuf) == 0) {
double n = expr(&e, 0);
if (*e.s != '\n' && *e.s != '\0' && *e.s != '=')
error(&e, "traling chars detected");
return n;
}
if (perr) *perr = e.errmsg;
return 0;
}
int main(void) {
char buff[BUFSIZ];
while (printf("> "), fgets(buff, BUFSIZ, stdin) != NULL) {
const char *errmsg = NULL;
double n = calc(buff, &errmsg);
if (errmsg) printf("ERROR: %s\n", errmsg);
else printf("%g\n", n);
}
return 0;
}

复制代码

starwing83 发表于 2013-03-18 11:09
回复 7# sonicling

你见过几十个运算符的语言么？C？那也才三十多个，没有上百行吧？

而且，其实很多switch-case是可以被归结成一个数据表的啊。

说到最后，其实还是设计上的问题。我上面的帖子最开始其实是两个函数simpleexpr和expr，是觉得simpleexpr只用了一次而已，就人肉内联到expr了而已。

Lua语言，这是真实语言了吧，它的lparser里面就根本没有大函数的。