数学建模社区-数学中国»论坛 › 【编程区】语言讨论 › Forcal程序设计 › C/C++调用MLu的入门程序

查看: 8454|回复: 0

C/C++调用MLu的入门程序

[复制链接]

字体大小: 正常放大

forcal

45 主题	3 听众	282 积分

升级 91%

TA的每日心情

	难过 2012-8-27 18:22

签到天数: 1 天

[LV.1]初来乍到

电梯直达

1^#

发表于 2011-10-30 20:17 |只看该作者 |倒序浏览

|招呼Ta 关注Ta

C/C++调用MLu的入门程序

MLu是程序和Lu核心库之间的一个接口库，MLu会自动加载Lu核心库和动态加载多个Lu扩展库，简化了Lu系统的使用；MLu可对Lu源程序进行模块化编译，能够编译运行具有固定格式的源程序（字符串表达式），源程序中可以使用C++风格的注释。此外，MLu还提供了多个线程互斥地访问Lu资源的功能；提供了Lu运行**器，以退出耗时较长的程序；提供在脚本中动态编译函数的功能；提供错误处理函数，实现错误（异常）处理的恢复模型等等。

1 隐式加载例子

该例子需要以下支持文件：

（1）头文件lu32.h。
（2）导入库lu32.lib及mlu32.lib。
（3）核心库lu32.dll和模块化编译运行库mlu32.dll。

#include <windows.h>7 {$ z$ a# z4 O2 K% V5 G9 P8 _
#include <iostream>: {1 `7 q: ], X
#include "lu32.h" //Lu头文件4 I, `1 s: @ d
#pragma comment( lib, "lu32.lib" )
2 T, ~$ N) ]3 s* [' K# `
#pragma comment( lib, "mlu32.lib" )
\\" e\\" ?\\" S+ F3 K( L& j. U! Q
using namespace std;) D' o! W/ T9 D. L( ~. G
void main(void)
: j8 G4 m/ R\\" ]2 A; [) `
{
6 l: b t0 N7 w
void *hModule; //模块句柄; }. h4 f0 \! Y* F) ?\\" u
luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置
\\" m- L9 \5 s/ y\\" q8 Z
int i; //错误代码4 M7 u# b8 K* `5 Q# @\\" O! j
void *hFor; //表达式句柄4 j/ p# S8 o7 j\\" U7 Y
luVOID nModule=0; //表达式所在模块
9 S' ^\\" I6 ^! d' h) y) w7 ]6 Q( u. t
void *vPara; //存放输入自变量的数组指针
% N& j/ v; _$ D3 C
LuData *pPara; //存放输入自变量的数组指针
, i* V, E: u& N1 p8 _# x
luINT nPara; //存放表达式的自变量个数, ^. _$ x+ q- A) ^( ^4 |
LuData Val; //存放表达式的值
c8 _1 z6 ^1 E8 A
wchar_t ForStr[]=L"f(x)=x+1; :::ff(x,y)=f(x)+y;"; //Lu模块化源程序1 Z+ K6 u9 o, ^1 P* v' T! R
if(!InitMLu()) return; //初始化MLu7 d, u9 D; D- j: S7 E0 H
if(!UseLu(2)) //申请使用Lu资源
6 a0 K4 d: X$ S: `. \
{
* u; x- p3 X9 q0 K$ F
i=ComModule(ForStr,nModule,hModule,ErrBegin,ErrEnd); //编译Lu源程序
4 H# K0 _( Q% q7 }
if(i)
' P c$ ~1 L2 P' L& B; H' O! ?
{3 d; W4 E/ P r \' c1 y+ ]
cout<<"Lu源程序有错误！错误代码："<<i<<endl;
+ F$ e\\" [2 g5 A
}9 F2 _! k6 u, e4 T% D
else+ L4 e! R. L7 h8 k\\" k
{# D4 U% c* G( t
if(GetFor(L"ff",1,NULL,nModule,hFor,vPara,nPara)) //查找全局函数4 {- G0 }% ?+ z! j4 I: L# v6 ?; T8 ?
{
# O. C, ~' q0 x* _0 U8 x
pPara=(LuData *)vPara;* X# N0 r5 N' ~2 d5 S; f/ d
for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为11 y6 {$ K) P: e3 ~
{
% R# z2 K+ `' e3 }2 o# w
pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;6 ~) u' ~$ l H0 ]- z
}, L+ R( A6 v% ^) Q q1 m6 o& K( O! x
Val=LuCal(hFor,pPara); //计算表达式的值0 X: |% ]: R4 R; |5 N3 Z& c; d- y
cout<<Val.x<<endl;/ h6 s2 y2 K) s) D, w, L4 C& a9 L
}
- M; {: S( ^: N0 f
else' ?. f1 f% i1 {' A- l( s5 O2 s1 S
{2 \7 ^8 e; E6 q
cout<<"找不到指定的函数！"<<endl;
}
: f- B! n* B% n- o0 b7 b, }% M
}( F/ T0 ^3 ]) T/ H- `, W
UseLu(0); //归还Lu的使用权% H3 Q/ b\\" x' E0 p
}
O' y$ T; E7 K+ m5 ?
FreeMLu(); //释放MLu
8 z. y6 L\\" `, g3 F
}

#include <windows.h>7 {$ z$ a# z4 O2 K% V5 G9 P8 _

#include <iostream>: {1 `7 q: ], X

#include "lu32.h"                        //Lu头文件4 I, `1 s: @  d

#pragma comment( lib, "lu32.lib" ) 
2 T, ~$ N) ]3 s* [' K# `
#pragma comment( lib, "mlu32.lib" ) 
\\" e\\" ?\\" S+ F3 K( L& j. U! Q
using namespace std;) D' o! W/ T9 D. L( ~. G

void main(void) 
: j8 G4 m/ R\\" ]2 A; [) `
{ 
6 l: b  t0 N7 w
        void *hModule;                //模块句柄; }. h4 f0 \! Y* F) ?\\" u

luINT ErrBegin,ErrEnd;        //表达式编译出错的初始位置和结束位置 
\\" m- L9 \5 s/ y\\" q8 Z
        int i;                        //错误代码4 M7 u# b8 K* `5 Q# @\\" O! j

void *hFor;                //表达式句柄4 j/ p# S8 o7 j\\" U7 Y

luVOID nModule=0;                //表达式所在模块 
9 S' ^\\" I6 ^! d' h) y) w7 ]6 Q( u. t
        void *vPara;                //存放输入自变量的数组指针 
% N& j/ v; _$ D3 C
        LuData *pPara;                //存放输入自变量的数组指针 
, i* V, E: u& N1 p8 _# x
        luINT nPara;                //存放表达式的自变量个数, ^. _$ x+ q- A) ^( ^4 |

LuData Val;                //存放表达式的值 
  c8 _1 z6 ^1 E8 A
        wchar_t ForStr[]=L"f(x)=x+1; :::ff(x,y)=f(x)+y;";        //Lu模块化源程序1 Z+ K6 u9 o, ^1 P* v' T! R

if(!InitMLu()) return;        //初始化MLu7 d, u9 D; D- j: S7 E0 H

if(!UseLu(2))                //申请使用Lu资源 
6 a0 K4 d: X$ S: `. \
        { 
* u; x- p3 X9 q0 K$ F
                i=ComModule(ForStr,nModule,hModule,ErrBegin,ErrEnd);        //编译Lu源程序 
4 H# K0 _( Q% q7 }
                if(i) 
' P  c$ ~1 L2 P' L& B; H' O! ?
                {3 d; W4 E/ P  r  \' c1 y+ ]

cout<<"Lu源程序有错误！错误代码："<<i<<endl; 
+ F$ e\\" [2 g5 A
                }9 F2 _! k6 u, e4 T% D

else+ L4 e! R. L7 h8 k\\" k

{# D4 U% c* G( t

if(GetFor(L"ff",1,NULL,nModule,hFor,vPara,nPara))        //查找全局函数4 {- G0 }% ?+ z! j4 I: L# v6 ?; T8 ?

{ 
# O. C, ~' q0 x* _0 U8 x
                                pPara=(LuData *)vPara;* X# N0 r5 N' ~2 d5 S; f/ d

for(i=0;i<=nPara;i++)        //表达式自变量赋值，均赋值为11 y6 {$ K) P: e3 ~

{ 
% R# z2 K+ `' e3 }2 o# w
                                        pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;6 ~) u' ~$ l  H0 ]- z

}, L+ R( A6 v% ^) Q  q1 m6 o& K( O! x

Val=LuCal(hFor,pPara);        //计算表达式的值0 X: |% ]: R4 R; |5 N3 Z& c; d- y

cout<<Val.x<<endl;/ h6 s2 y2 K) s) D, w, L4 C& a9 L

} 
- M; {: S( ^: N0 f
                        else' ?. f1 f% i1 {' A- l( s5 O2 s1 S

{2 \7 ^8 e; E6 q

cout<<"找不到指定的函数！"<<endl; 
% Y  h2 d$ ]4 ]# W# s0 K  I, Y4 f/ T5 }
                        } 
: f- B! n* B% n- o0 b7 b, }% M
                }( F/ T0 ^3 ]) T/ H- `, W

UseLu(0);                //归还Lu的使用权% H3 Q/ b\\" x' E0 p

} 
  O' y$ T; E7 K+ m5 ?
        FreeMLu();                //释放MLu 
8 z. y6 L\\" `, g3 F
}

结果：

3
6 _8 U) f) b& q$ Y
请按任意键继续. . .

复制代码

2 显式加载例子

该例子需要以下支持文件：

（1）头文件lu32.h。
（2）核心库lu32.dll和模块化编译运行库mlu32.dll。

#include <windows.h>: Y$ e$ _, Z2 ~9 u# J# e, J% Z
#include <iostream>* U& _+ g+ g1 I, E\\" s; T3 M# r. K/ i
#include "Lu32.h"/ q* |9 h% m1 K( J\\" ~! K
using namespace std;6 r1 h* m) c6 T& l1 c
HINSTANCE hMLu=NULL; //动态库MLu32.dll的句柄 T5 X0 X7 H. K! e
' C: A0 N( _& d# H) v: |; X$ f
//MLu输出函数
5 O4 |' v. f. a8 a2 [8 B6 I# z
mluInitMLu pInitMLu;
, h/ | G+ X+ [4 `
mluFreeMLu pFreeMLu;4 {7 |( {' M/ ^1 n9 V0 s\\" B
mluGetLuProc pGetLuProc;
( _& W4 @3 e' r# q
mluUseLu pUseLu;% Z/ y! F1 k9 F/ @; o4 s8 R
mluComModule pComModule; {$ R9 d- L! y7 i9 h
//Lu输出函数
: s0 [\\" N- e9 @2 V, G; ]& ?
luGetFor pGetFor;
, @, l. F5 R2 U1 X
luLuCal pLuCal;
& z' z# k$ X8 Z6 v
bool theInitMLu(void) //初始化MLu
& u: I- }2 P5 d4 ~4 q; v
{ c! F3 I$ w: `' W# J4 ~
hMLu=LoadLibrary(L"MLu32.dll"); //加载动态库MLu32.dll
# ], h' i' F Q# K) B9 d
if(!hMLu)
5 l# K1 q( \, p7 k% l# T- H
{
& |2 u+ R0 n x1 b5 g0 H
cout<<"找不到MLu32.dll！请将该库放到WINDOWS的搜索路径内！";4 B+ U; z+ |$ Q( t6 t( J
return false;$ ~$ S2 T+ {. K+ h* {
}
t6 t# x# x3 h/ I: @
//以下几个语句获取MLu32.dll的输出函数
' y6 P2 a( j l2 K# C
pInitMLu=(mluInitMLu) GetProcAddress(hMLu,"InitMLu");
2 X* o3 ]# w$ F0 h8 a3 W
pFreeMLu=(mluFreeMLu) GetProcAddress(hMLu,"FreeMLu");
) a- w* Y) j. B% | n8 G$ c& V
pGetLuProc=(mluGetLuProc) GetProcAddress(hMLu,"GetLuProc");
1 v, ~0 w9 `( Q; L5 G
pUseLu=(mluUseLu) GetProcAddress(hMLu,"UseLu");
, O5 u7 Q/ q) C; L\\" t V5 G' k
pComModule=(mluComModule) GetProcAddress(hMLu,"ComModule");
; ^3 A/ R+ ?& h3 V! c5 V
if(!pInitMLu()) //初始化MLu32.dll! {5 O8 t( [+ {# i1 w# g/ A
{ i$ @4 _2 E5 Y1 ~
FreeLibrary(hMLu); //释放动态库: L0 q6 F$ Q% }0 V! o4 Q/ C: y/ p
cout<<"MLu初始化失败！";
2 [# I$ Y/ Y/ J# S% X, Y
return false;
4 c8 A' v: T0 T/ R
}
5 d! O. {0 R6 F* a\\" @, p% e c
//以下几个语句获取Lu32.dll的输出函数
_- \3 x$ d9 p& C( B
pGetFor=(luGetFor) pGetLuProc("GetFor"); [& A/ F y4 g* p( d, i
pLuCal=(luLuCal) pGetLuProc("LuCal");
6 A+ ? w' Y/ f- @4 ^( ]8 k
return true;4 c+ \! `6 m2 H7 {& ^
}
- Z$ m+ x8 f* r v
void theFreeMLu(void) //释放MLu
q% K4 L2 {% z: g5 F* F- f% M; v
{3 z. V/ x! `8 ^- {) h5 E
pFreeMLu(); //释放MLu申请的空间
4 W. O$ N, U& ~9 R
FreeLibrary(hMLu); //释放动态库- T3 x) `2 k% Z0 I
}% Z5 g( O. |% a8 p; D
void main(void)
7 A+ Y% w\\" D8 a( C) H7 U
{8 C$ m5 e3 k5 _6 x- I/ c0 u. I) q
void *hModule; //模块句柄' a& k+ h0 ]9 w7 h. f5 Q: Q. l
luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置
* I6 {\\" S' m9 Q6 ~* c* M+ O4 W. Q
int i; //错误代码
2 Q' W. L9 K: @% }
void *hFor; //表达式句柄
3 ^, W1 k0 J) i' |. ]
luVOID nModule=0; //表达式所在模块. }2 e. Z; ? H& ~\\" j3 ?+ H
void *vPara; //存放输入自变量的数组指针
4 i$ f7 @; B) ?9 I9 h5 p* {
LuData *pPara; //存放输入自变量的数组指针
. J2 D. h8 ?: v, q; a* ~
luINT nPara; //存放表达式的自变量个数( r5 M7 T$ ?6 U! A. O3 n7 ]; A
LuData Val; //存放表达式的值* Q* j4 E# ^+ [5 A0 }
wchar_t ForStr[]=L"f(x)=x+1; :::ff(x,y)=f(x)+y;"; //Lu模块化源程序' U6 p: N& U\\" q$ }4 z7 ?2 B* S
if(!theInitMLu()) return; //初始化MLu0 Q* D' K9 g8 p5 \, f
if(!pUseLu(2)) //申请使用Lu资源* |. w: a2 `4 @2 U0 B; O
{
, Z9 _7 v. f6 O i4 h. E+ W' G
i=pComModule(ForStr,nModule,hModule,ErrBegin,ErrEnd); //编译Lu源程序
+ ?$ P& {# b) _$ L8 d' a\\" Q5 Q
if(i)& z) v, }# X) x\\" c* {4 A
{, v& G1 C. ]) t/ F8 e8 P
cout<<"Lu源程序有错误！错误代码："<<i<<endl;$ |9 U0 |6 R\\" D! b4 o8 `\\" K) Y6 k
}$ b: T: y) |' K* ]1 T) L7 ]: _
else
?9 G5 }4 e\\" Y0 a7 x
{$ A6 u) ], m6 Q& q: j0 d/ v
if(pGetFor(L"ff",1,NULL,nModule,hFor,vPara,nPara))2 h7 f8 Z( S& U\\" w+ F. @5 y' l9 I
{. s( F\\" V) G! S. ]+ B( d( k
pPara=(LuData *)vPara;
\\" d' K' d; a- d) u) S7 B+ Y; v/ a+ L
for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为15 b4 T9 Y& J! _- r! k/ ]
{$ d9 Q4 V/ E! F. V5 y\\" C: E
pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;* ]# v- i0 C1 L9 V! |* D& n8 g( H
}
7 L9 C# d) H- a\\" m/ L) v5 M2 E
Val=pLuCal(hFor,pPara); //计算表达式的值; ^9 Y7 O* Q3 Q2 o( ]
cout<<Val.x<<endl;3 g1 d7 \9 ?$ E5 l2 H/ Z
}
+ }& M: c( s$ l4 f
else+ x5 z9 e& y; N) J& N
{
7 O- {% X# r7 t! s
cout<<"找不到指定的函数！"<<endl;
& K# A* u2 g4 A. f9 i
}
5 J$ p4 A9 e/ l) }$ Q1 w1 u K
}
H* O, a# {& M* c' W9 g/ [
pUseLu(0); //归还Lu的使用权
/ M- `& f5 A1 J/ B' j
}) m\\" ~- s* f9 E
theFreeMLu(); //释放MLu
6 N& p. C7 W( w% o8 Q; G9 @
}

#include <windows.h>: Y$ e$ _, Z2 ~9 u# J# e, J% Z

#include <iostream>* U& _+ g+ g1 I, E\\" s; T3 M# r. K/ i

#include "Lu32.h"/ q* |9 h% m1 K( J\\" ~! K

using namespace std;6 r1 h* m) c6 T& l1 c

HINSTANCE hMLu=NULL;        //动态库MLu32.dll的句柄  T5 X0 X7 H. K! e

' C: A0 N( _& d# H) v: |; X$ f

//MLu输出函数 
5 O4 |' v. f. a8 a2 [8 B6 I# z
mluInitMLu pInitMLu; 
, h/ |  G+ X+ [4 `
mluFreeMLu pFreeMLu;4 {7 |( {' M/ ^1 n9 V0 s\\" B

mluGetLuProc pGetLuProc; 
( _& W4 @3 e' r# q
mluUseLu pUseLu;% Z/ y! F1 k9 F/ @; o4 s8 R

mluComModule pComModule;  {$ R9 d- L! y7 i9 h

//Lu输出函数 
: s0 [\\" N- e9 @2 V, G; ]& ?
luGetFor pGetFor; 
, @, l. F5 R2 U1 X
luLuCal pLuCal; 
& z' z# k$ X8 Z6 v
bool theInitMLu(void)        //初始化MLu 
& u: I- }2 P5 d4 ~4 q; v
{  c! F3 I$ w: `' W# J4 ~

hMLu=LoadLibrary(L"MLu32.dll");        //加载动态库MLu32.dll 
# ], h' i' F  Q# K) B9 d
        if(!hMLu) 
5 l# K1 q( \, p7 k% l# T- H
        { 
& |2 u+ R0 n  x1 b5 g0 H
                cout<<"找不到MLu32.dll！请将该库放到WINDOWS的搜索路径内！";4 B+ U; z+ |$ Q( t6 t( J

return false;$ ~$ S2 T+ {. K+ h* {

} 
  t6 t# x# x3 h/ I: @
        //以下几个语句获取MLu32.dll的输出函数 
' y6 P2 a( j  l2 K# C
        pInitMLu=(mluInitMLu) GetProcAddress(hMLu,"InitMLu"); 
2 X* o3 ]# w$ F0 h8 a3 W
        pFreeMLu=(mluFreeMLu) GetProcAddress(hMLu,"FreeMLu"); 
) a- w* Y) j. B% |  n8 G$ c& V
        pGetLuProc=(mluGetLuProc) GetProcAddress(hMLu,"GetLuProc"); 
1 v, ~0 w9 `( Q; L5 G
        pUseLu=(mluUseLu) GetProcAddress(hMLu,"UseLu"); 
, O5 u7 Q/ q) C; L\\" t  V5 G' k
        pComModule=(mluComModule) GetProcAddress(hMLu,"ComModule"); 
; ^3 A/ R+ ?& h3 V! c5 V
        if(!pInitMLu())        //初始化MLu32.dll! {5 O8 t( [+ {# i1 w# g/ A

{  i$ @4 _2 E5 Y1 ~

FreeLibrary(hMLu);        //释放动态库: L0 q6 F$ Q% }0 V! o4 Q/ C: y/ p

cout<<"MLu初始化失败！"; 
2 [# I$ Y/ Y/ J# S% X, Y
                return false; 
4 c8 A' v: T0 T/ R
        } 
5 d! O. {0 R6 F* a\\" @, p% e  c
        //以下几个语句获取Lu32.dll的输出函数 
  _- \3 x$ d9 p& C( B
        pGetFor=(luGetFor) pGetLuProc("GetFor");  [& A/ F  y4 g* p( d, i

pLuCal=(luLuCal) pGetLuProc("LuCal"); 
6 A+ ?  w' Y/ f- @4 ^( ]8 k
        return true;4 c+ \! `6 m2 H7 {& ^

} 
- Z$ m+ x8 f* r  v
void theFreeMLu(void)        //释放MLu 
  q% K4 L2 {% z: g5 F* F- f% M; v
{3 z. V/ x! `8 ^- {) h5 E

pFreeMLu();        //释放MLu申请的空间 
4 W. O$ N, U& ~9 R
        FreeLibrary(hMLu);        //释放动态库- T3 x) `2 k% Z0 I

}% Z5 g( O. |% a8 p; D

void main(void) 
7 A+ Y% w\\" D8 a( C) H7 U
{8 C$ m5 e3 k5 _6 x- I/ c0 u. I) q

void *hModule;                //模块句柄' a& k+ h0 ]9 w7 h. f5 Q: Q. l

luINT ErrBegin,ErrEnd;        //表达式编译出错的初始位置和结束位置 
* I6 {\\" S' m9 Q6 ~* c* M+ O4 W. Q
        int i;                        //错误代码 
2 Q' W. L9 K: @% }
        void *hFor;                //表达式句柄 
3 ^, W1 k0 J) i' |. ]
        luVOID nModule=0;                //表达式所在模块. }2 e. Z; ?  H& ~\\" j3 ?+ H

void *vPara;                //存放输入自变量的数组指针 
4 i$ f7 @; B) ?9 I9 h5 p* {
        LuData *pPara;                //存放输入自变量的数组指针 
. J2 D. h8 ?: v, q; a* ~
        luINT nPara;                //存放表达式的自变量个数( r5 M7 T$ ?6 U! A. O3 n7 ]; A

LuData Val;                //存放表达式的值* Q* j4 E# ^+ [5 A0 }

wchar_t ForStr[]=L"f(x)=x+1; :::ff(x,y)=f(x)+y;";        //Lu模块化源程序' U6 p: N& U\\" q$ }4 z7 ?2 B* S

if(!theInitMLu()) return;        //初始化MLu0 Q* D' K9 g8 p5 \, f

if(!pUseLu(2))                //申请使用Lu资源* |. w: a2 `4 @2 U0 B; O

{ 
, Z9 _7 v. f6 O  i4 h. E+ W' G
                i=pComModule(ForStr,nModule,hModule,ErrBegin,ErrEnd);        //编译Lu源程序 
+ ?$ P& {# b) _$ L8 d' a\\" Q5 Q
                if(i)& z) v, }# X) x\\" c* {4 A

{, v& G1 C. ]) t/ F8 e8 P

cout<<"Lu源程序有错误！错误代码："<<i<<endl;$ |9 U0 |6 R\\" D! b4 o8 `\\" K) Y6 k

}$ b: T: y) |' K* ]1 T) L7 ]: _

else 
  ?9 G5 }4 e\\" Y0 a7 x
                {$ A6 u) ], m6 Q& q: j0 d/ v

if(pGetFor(L"ff",1,NULL,nModule,hFor,vPara,nPara))2 h7 f8 Z( S& U\\" w+ F. @5 y' l9 I

{. s( F\\" V) G! S. ]+ B( d( k

pPara=(LuData *)vPara; 
\\" d' K' d; a- d) u) S7 B+ Y; v/ a+ L
                                for(i=0;i<=nPara;i++)        //表达式自变量赋值，均赋值为15 b4 T9 Y& J! _- r! k/ ]

{$ d9 Q4 V/ E! F. V5 y\\" C: E

pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;* ]# v- i0 C1 L9 V! |* D& n8 g( H

} 
7 L9 C# d) H- a\\" m/ L) v5 M2 E
                                Val=pLuCal(hFor,pPara);        //计算表达式的值; ^9 Y7 O* Q3 Q2 o( ]

cout<<Val.x<<endl;3 g1 d7 \9 ?$ E5 l2 H/ Z

} 
+ }& M: c( s$ l4 f
                        else+ x5 z9 e& y; N) J& N

{ 
7 O- {% X# r7 t! s
                                cout<<"找不到指定的函数！"<<endl; 
& K# A* u2 g4 A. f9 i
                        } 
5 J$ p4 A9 e/ l) }$ Q1 w1 u  K
                } 
  H* O, a# {& M* c' W9 g/ [
                pUseLu(0);        //归还Lu的使用权 
/ M- `& f5 A1 J/ B' j
        }) m\\" ~- s* f9 E

theFreeMLu();                //释放MLu 
6 N& p. C7 W( w% o8 Q; G9 @
}

结果：