错误显示

atmystate

用Perl做个简单的代码处理器，
实现类似编译器的多处错误报警显示，
对输入的类似汇编代码输入调用对应命令处理
exmple：MOV A,sth 对应 sub move{}函数进行处理
现在的做法是在处理函数中加入以下代码
if(errortime<seterrortime){
errortime++
print error
}
else{
die error
}
有更好的方法实现这一功能吗？？

sysengcn

没什么写编译器的经验哈，瞎说说而已。。。

不过我想如果你的每个处理函数都有上面那几行代码，那也许应该把它们放到一个函数里面。