// names are unique within a function, any valid variable name// you only need to put in what you need, not all exceptions, or total exception count
#define GTRY(name,
驱动这种进化搜索的适应度函数是目标函数的一个版本,在每个条件形式的每个分支上都有标签(例如(if TEST (do (branch-label ...)使用控制流图中节点的索引调用branch-label函数,该索引对应于函数执行中的当前点和另一个分支的分支距离。然后,该函数根据接近级别和分支距离计算适合度值,并将其存储在原子中。我最初的方法是让branch-label函数抛出一种特定类型的异常,然后由我的搜索函数捕获该异常,但后来我想到,如果终止条件在try-catc