这里好像没人呐 ^^ 改写了一下 ACED_ADSSYMBOL_ENTRY_AUTO

aeo

ACED_ADSSYMBOL_ENTRY_AUTO
要定义成lisp函数的规则是 :
class AAA{
    static int ads_BBB(){}
}
对应为 ACED_ADSSYMBOL_ENTRY_AUTO (AAA BBB false)
必须是ads_开始命名，名称不能出现  - : >  等lisp接受的字符.
用起来很不爽。

小改造一下：
1不要ads_开始(函数定义规则和原来一样，只是不必须ads_)，
2名称 自己命名
ACED_ADSSYMBOL_ENTRY_AUTO2 (AAAclass BBBfunc lispName bool)
AAA 为class
BBB 为函数全称(如果ads_ 开始命名，ads_也要加入到名称里面)
lispName 字符串，输出函数名称(比如 "xb->lisp:BBB")

1. #define ACED_ADSSYMBOL_ENTRY_AUTO2(classname, Func, nameStr, regFunc) \
   
2.   __declspec(selectany) _ADSSYMBOL_ENTRY __AdsSymbolMap_##Func = { _RXST(nameStr), classname::##Func, regFunc, -1 } ; \
   
3.   extern "C" __declspec(allocate("ADSSYMBOL$__m")) __declspec(selectany) _ADSSYMBOL_ENTRY* const __pAdsSymbolMap_##Func = &__AdsSymbolMap_##Func ; \
   
4.   ACED_ADSSYMBOL_ENTRY_PRAGMA(Func)

#define ACED_ADSSYMBOL_ENTRY_AUTO2(classname, Func, nameStr, regFunc) \<br />   __declspec(selectany) _ADSSYMBOL_ENTRY __AdsSymbolMap_##Func = { _RXST(nameStr), classname::##Func, regFunc, -1 } ; \<br />   extern "C" __declspec(allocate("ADSSYMBOL$__m")) __declspec(selectany) _ADSSYMBOL_ENTRY* const __pAdsSymbolMap_##Func = &__AdsSymbolMap_##Func ; \<br />   ACED_ADSSYMBOL_ENTRY_PRAGMA(Func)

eachy

aeo 出手不凡啊！