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

查看: 8078|回复: 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>. e2 C1 e4 R2 } m
#include <iostream>; ?# r5 r6 v) E; H
#include "lu32.h" //Lu头文件
: |0 O, a# s* E2 U+ ^/ t
#pragma comment( lib, "lu32.lib" )
6 [, L1 L: j- s: ~; {$ t
#pragma comment( lib, "mlu32.lib" )
# o3 b3 p. v7 Y s# p
using namespace std;
\\" j; T: x2 R6 ~$ ~. D: W3 Q
void main(void)9 P+ `9 q$ F# }- w9 f' P6 {
{8 A\\" U/ U }5 V$ Q% W8 F
void *hModule; //模块句柄
# J/ {' m1 [1 I. r( f5 q& Y, d4 q8 ~
luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置
& \' v/ [8 ~\\" _, i4 L
int i; //错误代码
/ o# S( V+ }9 x, ^% F8 ~' I
void *hFor; //表达式句柄9 b; A& i5 j, z! ]
luVOID nModule=0; //表达式所在模块0 Y' e6 [) {' c/ r. q; ?
void *vPara; //存放输入自变量的数组指针
1 D2 {, G\\" A( L) W* ?( R' H% |
LuData *pPara; //存放输入自变量的数组指针
6 N1 f8 X# l2 k3 l$ d$ ?
luINT nPara; //存放表达式的自变量个数9 _, {1 D: @! S8 ]/ F/ u. J; w
LuData Val; //存放表达式的值
; p! d0 R8 ^, @5 s/ S
wchar_t ForStr[]=L"f(x)=x+1; :::ff(x,y)=f(x)+y;"; //Lu模块化源程序
0 T/ I% S; c5 A, k/ c' k9 K: A
if(!InitMLu()) return; //初始化MLu
8 u& b! I# b# S. e9 d
if(!UseLu(2)) //申请使用Lu资源0 B& }& U& n& E* P& t8 M/ N5 ?
{2 K4 N2 _9 p+ G2 W& X& z' s5 U
i=ComModule(ForStr,nModule,hModule,ErrBegin,ErrEnd); //编译Lu源程序
* X. n, g# G0 i6 R% {) ^5 F
if(i)
J2 |' i7 I' s6 j5 I& S1 o8 Y+ q$ M
{
1 c# `* h/ A& z* m1 ^\\" `4 Y& ?- Q
cout<<"Lu源程序有错误！错误代码："<<i<<endl;9 g7 P! g$ M2 W1 ]
}/ C! _2 Z( x\\" \% L- P1 d K0 A& o
else
5 d& J1 K1 f1 D6 c\\" O) V3 w8 ^6 v
{
# Q6 k+ F1 U- ]\\" B6 a
if(GetFor(L"ff",1,NULL,nModule,hFor,vPara,nPara)) //查找全局函数9 C, L; ^+ W g
{
8 z/ j% I n7 c2 F4 {+ Q6 r\\" f
pPara=(LuData *)vPara;6 a/ E' U5 _6 [! V# ?
for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为12 [) b1 y E# G+ s3 |% H
{# ^2 B; j9 g6 h4 Q' m
pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;
; F5 i7 k6 u! J7 ?5 p, m% E
}
8 m8 X* e, o+ _
Val=LuCal(hFor,pPara); //计算表达式的值/ p: b- c5 q# ~7 m2 P$ F
cout<<Val.x<<endl;
* \$ _8 M$ k* \. J
}
- T6 [# ~% w& ]
else u3 W2 ]; E\\" R+ V+ i. c\\" ^# Z
{
( y5 ~/ d\\" E. ]
cout<<"找不到指定的函数！"<<endl;: ~9 W# j Z' Y5 w9 E6 W
}4 `, `0 z! s$ m: T0 D' f1 E! ^
}9 M0 x# K# O, W' P$ i1 h/ [3 S: \\\" Z5 v) k
UseLu(0); //归还Lu的使用权 R4 x* z7 p\\" q4 a
}
% @4 N ^% U, H; {
FreeMLu(); //释放MLu
% ^2 N; B1 I ~9 z3 C9 {- D/ u' s
}

#include <windows.h>. e2 C1 e4 R2 }  m

#include <iostream>; ?# r5 r6 v) E; H

#include "lu32.h"                        //Lu头文件 
: |0 O, a# s* E2 U+ ^/ t
#pragma comment( lib, "lu32.lib" ) 
6 [, L1 L: j- s: ~; {$ t
#pragma comment( lib, "mlu32.lib" ) 
# o3 b3 p. v7 Y  s# p
using namespace std; 
\\" j; T: x2 R6 ~$ ~. D: W3 Q
void main(void)9 P+ `9 q$ F# }- w9 f' P6 {

{8 A\\" U/ U  }5 V$ Q% W8 F

void *hModule;                //模块句柄 
# J/ {' m1 [1 I. r( f5 q& Y, d4 q8 ~
        luINT ErrBegin,ErrEnd;        //表达式编译出错的初始位置和结束位置 
& \' v/ [8 ~\\" _, i4 L
        int i;                        //错误代码 
/ o# S( V+ }9 x, ^% F8 ~' I
        void *hFor;                //表达式句柄9 b; A& i5 j, z! ]

luVOID nModule=0;                //表达式所在模块0 Y' e6 [) {' c/ r. q; ?

void *vPara;                //存放输入自变量的数组指针 
1 D2 {, G\\" A( L) W* ?( R' H% |
        LuData *pPara;                //存放输入自变量的数组指针 
6 N1 f8 X# l2 k3 l$ d$ ?
        luINT nPara;                //存放表达式的自变量个数9 _, {1 D: @! S8 ]/ F/ u. J; w

LuData Val;                //存放表达式的值 
; p! d0 R8 ^, @5 s/ S
        wchar_t ForStr[]=L"f(x)=x+1; :::ff(x,y)=f(x)+y;";        //Lu模块化源程序 
0 T/ I% S; c5 A, k/ c' k9 K: A
        if(!InitMLu()) return;        //初始化MLu 
8 u& b! I# b# S. e9 d
        if(!UseLu(2))                //申请使用Lu资源0 B& }& U& n& E* P& t8 M/ N5 ?

{2 K4 N2 _9 p+ G2 W& X& z' s5 U

i=ComModule(ForStr,nModule,hModule,ErrBegin,ErrEnd);        //编译Lu源程序 
* X. n, g# G0 i6 R% {) ^5 F
                if(i) 
  J2 |' i7 I' s6 j5 I& S1 o8 Y+ q$ M
                { 
1 c# `* h/ A& z* m1 ^\\" `4 Y& ?- Q
                        cout<<"Lu源程序有错误！错误代码："<<i<<endl;9 g7 P! g$ M2 W1 ]

}/ C! _2 Z( x\\" \% L- P1 d  K0 A& o

else 
5 d& J1 K1 f1 D6 c\\" O) V3 w8 ^6 v
                { 
# Q6 k+ F1 U- ]\\" B6 a
                        if(GetFor(L"ff",1,NULL,nModule,hFor,vPara,nPara))        //查找全局函数9 C, L; ^+ W  g

{ 
8 z/ j% I  n7 c2 F4 {+ Q6 r\\" f
                                pPara=(LuData *)vPara;6 a/ E' U5 _6 [! V# ?

for(i=0;i<=nPara;i++)        //表达式自变量赋值，均赋值为12 [) b1 y  E# G+ s3 |% H

{# ^2 B; j9 g6 h4 Q' m

pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1; 
; F5 i7 k6 u! J7 ?5 p, m% E
                                } 
8 m8 X* e, o+ _
                                Val=LuCal(hFor,pPara);        //计算表达式的值/ p: b- c5 q# ~7 m2 P$ F

cout<<Val.x<<endl; 
* \$ _8 M$ k* \. J
                        } 
- T6 [# ~% w& ]
                        else  u3 W2 ]; E\\" R+ V+ i. c\\" ^# Z

{ 
( y5 ~/ d\\" E. ]
                                cout<<"找不到指定的函数！"<<endl;: ~9 W# j  Z' Y5 w9 E6 W

}4 `, `0 z! s$ m: T0 D' f1 E! ^

}9 M0 x# K# O, W' P$ i1 h/ [3 S: \\\" Z5 v) k

UseLu(0);                //归还Lu的使用权  R4 x* z7 p\\" q4 a

} 
% @4 N  ^% U, H; {
        FreeMLu();                //释放MLu 
% ^2 N; B1 I  ~9 z3 C9 {- D/ u' s
}

结果：

3
9 o* H1 Q! q6 p! [$ A
请按任意键继续. . .

复制代码

2 显式加载例子

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

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

#include <windows.h>
* }' [/ I% m; `- O& Q
#include <iostream>( l; L9 ] e1 a; ]) m, b+ p
#include "Lu32.h"5 q9 M/ E% p& [ l/ s
using namespace std;
. E) D3 E |2 N& n\\" h+ S3 s\\" X
HINSTANCE hMLu=NULL; //动态库MLu32.dll的句柄 O; o. L+ [4 o! z8 w
- d\\" |$ p+ l\\" Q6 ~& j3 m
//MLu输出函数
1 t% \9 _+ h% H9 y9 {
mluInitMLu pInitMLu;
5 @ o$ M8 N9 t1 y0 V
mluFreeMLu pFreeMLu;
6 ^2 P- }# T: X+ M( E( K
mluGetLuProc pGetLuProc;8 E) \/ l0 x& a6 ^9 n
mluUseLu pUseLu;
' T, D- m4 ?* G8 @6 ~3 A
mluComModule pComModule;2 W& n: a# G( p2 R0 a- j
//Lu输出函数
% ~$ Q2 G\\" _2 a
luGetFor pGetFor;\\" R# P3 `% K6 D. A6 t+ `
luLuCal pLuCal;
3 N- v) R% o8 ?6 i1 s
bool theInitMLu(void) //初始化MLu7 S. U/ b, E3 \/ n
{
/ c! m w3 w9 f( @, M8 i# ~4 `3 D
hMLu=LoadLibrary(L"MLu32.dll"); //加载动态库MLu32.dll
; g( }- {\\" Y2 C
if(!hMLu)% d: I$ z! O9 E+ f! ^& S( h! Q+ K
{
' O0 b+ E% G. Z8 K8 z) g
cout<<"找不到MLu32.dll！请将该库放到WINDOWS的搜索路径内！";
, G5 T* @* ]% o/ a* m! I
return false;; N( P F: J3 I# p
}- H) V ^: _8 o7 ~; [! a% m, O
//以下几个语句获取MLu32.dll的输出函数
3 H7 q% X9 ]7 c' o' ?; u* n! p& ?
pInitMLu=(mluInitMLu) GetProcAddress(hMLu,"InitMLu");
& k, e3 C8 c& r# i\\" n
pFreeMLu=(mluFreeMLu) GetProcAddress(hMLu,"FreeMLu");: r% b7 `/ z. V. _8 J* f4 w) n
pGetLuProc=(mluGetLuProc) GetProcAddress(hMLu,"GetLuProc");/ w% \ W8 f% c5 F+ h! H3 l5 X
pUseLu=(mluUseLu) GetProcAddress(hMLu,"UseLu");
) j% b3 O% \+ v\\" i! @3 ]
pComModule=(mluComModule) GetProcAddress(hMLu,"ComModule");9 [\\" N) B& U/ p; Z8 T( T# ?; Z
if(!pInitMLu()) //初始化MLu32.dll
0 b: D: W& r' w( i& `- w9 h: I* U. ~) P
{
% e5 L W9 C7 i5 R+ L1 ~/ `2 m0 |
FreeLibrary(hMLu); //释放动态库) h8 T% |: T9 y: a! J+ [
cout<<"MLu初始化失败！";4 I) `* t! s. r- U( @4 T, u, u
return false;
. G+ H7 ]. y4 \( w( h0 I
}
3 d* n% b; }3 F. T/ P
//以下几个语句获取Lu32.dll的输出函数* z- y$ a5 |0 L4 z- q- _' l* M
pGetFor=(luGetFor) pGetLuProc("GetFor");
- M/ ]# O7 A) \; k% V3 v
pLuCal=(luLuCal) pGetLuProc("LuCal");! b( l) i9 g& c& u+ W) ?
return true;; g6 r, |\\" n: E\\" C& P
}
) s( }\\" b3 O, B! q
void theFreeMLu(void) //释放MLu( w$ s* r0 d* s& _1 n. C$ T
{
# y. k$ Y9 Q: o; v- x0 ^
pFreeMLu(); //释放MLu申请的空间
! O$ h) j\\" _! y
FreeLibrary(hMLu); //释放动态库
# W$ ^4 j/ {* C6 m$ S
}
, ^3 z4 U2 d s# k( I. s
void main(void)
$ m! {; {$ R' x) e+ { ]8 v
{
+ X. T) j1 l6 ~8 B
void *hModule; //模块句柄
( N! X% d+ E! ]; {# U2 o- h- `
luINT ErrBegin,ErrEnd; //表达式编译出错的初始位置和结束位置$ Y' k' K9 a' Y5 b) V
int i; //错误代码
7 A7 K2 U+ O. F. ]! R
void *hFor; //表达式句柄# W0 Z% y9 b- S) ~2 X
luVOID nModule=0; //表达式所在模块3 R0 d: F7 w* r1 X. s+ I
void *vPara; //存放输入自变量的数组指针
3 G5 Y5 w, C6 g, ~ `) g6 J
LuData *pPara; //存放输入自变量的数组指针
# [+ E% J+ w4 K6 B$ E+ X
luINT nPara; //存放表达式的自变量个数
' m# q, | D% r6 A) P3 b: B! H; g
LuData Val; //存放表达式的值4 P0 t7 n8 Q7 W4 R1 k
wchar_t ForStr[]=L"f(x)=x+1; :::ff(x,y)=f(x)+y;"; //Lu模块化源程序% K) F1 K F1 d% P: l1 u
if(!theInitMLu()) return; //初始化MLu
/ t9 ]* h* Q! S1 [: Q
if(!pUseLu(2)) //申请使用Lu资源3 q\\" q; Q' m* [
{
i6 Z' A- O/ e# z+ t! I, ~
i=pComModule(ForStr,nModule,hModule,ErrBegin,ErrEnd); //编译Lu源程序1 s& w* |/ V/ g6 H( ^0 ^
if(i)
1 y# d2 s7 B1 k1 r- I9 Q4 {' W* l
{1 \. x; ^% M+ T; u! z
cout<<"Lu源程序有错误！错误代码："<<i<<endl;
r; b( b% x. p v/ _ z* D
}
: L5 y7 H/ L; R$ r+ h9 f
else9 U' |3 E+ e. [7 u
{
; }\\" w/ t l# d& y F, L
if(pGetFor(L"ff",1,NULL,nModule,hFor,vPara,nPara))( {& r0 \7 ]9 w$ [' l
{
; a4 R6 E- f6 h+ y# G% j
pPara=(LuData *)vPara;
- [, S3 z' P& Y) Z- J; e
for(i=0;i<=nPara;i++) //表达式自变量赋值，均赋值为19 x0 w- K' o6 w* @) _
{- w s, i% x+ |6 B+ G
pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1;
! }; g* l' D- |8 @% o. u
}! T; w$ t0 s! C, h$ _! U; r: H
Val=pLuCal(hFor,pPara); //计算表达式的值1 ^/ e- P( G2 E) t
cout<<Val.x<<endl;: t4 @3 _# \+ i. A( W4 x
}6 j/ A& `* M0 y; ]* Z7 h
else
8 T% a4 p$ V' E9 H% m( ]
{6 U- f m8 ?- c6 j5 b+ ^7 B. ]
cout<<"找不到指定的函数！"<<endl;: x4 i6 Y9 f* u' q( O
}7 r/ e! \ `. I2 \( l9 ^8 S
}
' y) Z, `1 a3 |% p4 p\\" `, }
pUseLu(0); //归还Lu的使用权
4 C, y* h4 `& S! h4 \. L/ [
}/ i {/ \; q m2 ?
theFreeMLu(); //释放MLu( ?% _1 F# C: z' _
}

#include <windows.h> 
* }' [/ I% m; `- O& Q
#include <iostream>( l; L9 ]  e1 a; ]) m, b+ p

#include "Lu32.h"5 q9 M/ E% p& [  l/ s

using namespace std; 
. E) D3 E  |2 N& n\\" h+ S3 s\\" X
HINSTANCE hMLu=NULL;        //动态库MLu32.dll的句柄  O; o. L+ [4 o! z8 w

- d\\" |$ p+ l\\" Q6 ~& j3 m

//MLu输出函数 
1 t% \9 _+ h% H9 y9 {
mluInitMLu pInitMLu; 
5 @  o$ M8 N9 t1 y0 V
mluFreeMLu pFreeMLu; 
6 ^2 P- }# T: X+ M( E( K
mluGetLuProc pGetLuProc;8 E) \/ l0 x& a6 ^9 n

mluUseLu pUseLu; 
' T, D- m4 ?* G8 @6 ~3 A
mluComModule pComModule;2 W& n: a# G( p2 R0 a- j

//Lu输出函数 
% ~$ Q2 G\\" _2 a
luGetFor pGetFor;\\" R# P3 `% K6 D. A6 t+ `

luLuCal pLuCal; 
3 N- v) R% o8 ?6 i1 s
bool theInitMLu(void)        //初始化MLu7 S. U/ b, E3 \/ n

{ 
/ c! m  w3 w9 f( @, M8 i# ~4 `3 D
        hMLu=LoadLibrary(L"MLu32.dll");        //加载动态库MLu32.dll 
; g( }- {\\" Y2 C
        if(!hMLu)% d: I$ z! O9 E+ f! ^& S( h! Q+ K

{ 
' O0 b+ E% G. Z8 K8 z) g
                cout<<"找不到MLu32.dll！请将该库放到WINDOWS的搜索路径内！"; 
, G5 T* @* ]% o/ a* m! I
                return false;; N( P  F: J3 I# p

}- H) V  ^: _8 o7 ~; [! a% m, O

//以下几个语句获取MLu32.dll的输出函数 
3 H7 q% X9 ]7 c' o' ?; u* n! p& ?
        pInitMLu=(mluInitMLu) GetProcAddress(hMLu,"InitMLu"); 
& k, e3 C8 c& r# i\\" n
        pFreeMLu=(mluFreeMLu) GetProcAddress(hMLu,"FreeMLu");: r% b7 `/ z. V. _8 J* f4 w) n

pGetLuProc=(mluGetLuProc) GetProcAddress(hMLu,"GetLuProc");/ w% \  W8 f% c5 F+ h! H3 l5 X

pUseLu=(mluUseLu) GetProcAddress(hMLu,"UseLu"); 
) j% b3 O% \+ v\\" i! @3 ]
        pComModule=(mluComModule) GetProcAddress(hMLu,"ComModule");9 [\\" N) B& U/ p; Z8 T( T# ?; Z

if(!pInitMLu())        //初始化MLu32.dll 
0 b: D: W& r' w( i& `- w9 h: I* U. ~) P
        { 
% e5 L  W9 C7 i5 R+ L1 ~/ `2 m0 |
                FreeLibrary(hMLu);        //释放动态库) h8 T% |: T9 y: a! J+ [

cout<<"MLu初始化失败！";4 I) `* t! s. r- U( @4 T, u, u

return false; 
. G+ H7 ]. y4 \( w( h0 I
        } 
3 d* n% b; }3 F. T/ P
        //以下几个语句获取Lu32.dll的输出函数* z- y$ a5 |0 L4 z- q- _' l* M

pGetFor=(luGetFor) pGetLuProc("GetFor"); 
- M/ ]# O7 A) \; k% V3 v
        pLuCal=(luLuCal) pGetLuProc("LuCal");! b( l) i9 g& c& u+ W) ?

return true;; g6 r, |\\" n: E\\" C& P

} 
) s( }\\" b3 O, B! q
void theFreeMLu(void)        //释放MLu( w$ s* r0 d* s& _1 n. C$ T

{ 
# y. k$ Y9 Q: o; v- x0 ^
        pFreeMLu();        //释放MLu申请的空间 
! O$ h) j\\" _! y
        FreeLibrary(hMLu);        //释放动态库 
# W$ ^4 j/ {* C6 m$ S
} 
, ^3 z4 U2 d  s# k( I. s
void main(void) 
$ m! {; {$ R' x) e+ {  ]8 v
{ 
+ X. T) j1 l6 ~8 B
        void *hModule;                //模块句柄 
( N! X% d+ E! ]; {# U2 o- h- `
        luINT ErrBegin,ErrEnd;        //表达式编译出错的初始位置和结束位置$ Y' k' K9 a' Y5 b) V

int i;                        //错误代码 
7 A7 K2 U+ O. F. ]! R
        void *hFor;                //表达式句柄# W0 Z% y9 b- S) ~2 X

luVOID nModule=0;                //表达式所在模块3 R0 d: F7 w* r1 X. s+ I

void *vPara;                //存放输入自变量的数组指针 
3 G5 Y5 w, C6 g, ~  `) g6 J
        LuData *pPara;                //存放输入自变量的数组指针 
# [+ E% J+ w4 K6 B$ E+ X
        luINT nPara;                //存放表达式的自变量个数 
' m# q, |  D% r6 A) P3 b: B! H; g
        LuData Val;                //存放表达式的值4 P0 t7 n8 Q7 W4 R1 k

wchar_t ForStr[]=L"f(x)=x+1; :::ff(x,y)=f(x)+y;";        //Lu模块化源程序% K) F1 K  F1 d% P: l1 u

if(!theInitMLu()) return;        //初始化MLu 
/ t9 ]* h* Q! S1 [: Q
        if(!pUseLu(2))                //申请使用Lu资源3 q\\" q; Q' m* [

{ 
  i6 Z' A- O/ e# z+ t! I, ~
                i=pComModule(ForStr,nModule,hModule,ErrBegin,ErrEnd);        //编译Lu源程序1 s& w* |/ V/ g6 H( ^0 ^

if(i) 
1 y# d2 s7 B1 k1 r- I9 Q4 {' W* l
                {1 \. x; ^% M+ T; u! z

cout<<"Lu源程序有错误！错误代码："<<i<<endl; 
  r; b( b% x. p  v/ _  z* D
                } 
: L5 y7 H/ L; R$ r+ h9 f
                else9 U' |3 E+ e. [7 u

{ 
; }\\" w/ t  l# d& y  F, L
                        if(pGetFor(L"ff",1,NULL,nModule,hFor,vPara,nPara))( {& r0 \7 ]9 w$ [' l

{ 
; a4 R6 E- f6 h+ y# G% j
                                pPara=(LuData *)vPara; 
- [, S3 z' P& Y) Z- J; e
                                for(i=0;i<=nPara;i++)        //表达式自变量赋值，均赋值为19 x0 w- K' o6 w* @) _

{- w  s, i% x+ |6 B+ G

pPara[i].BType=luStaData_int64; pPara[i].VType=luStaData_int64; pPara[i].x=1; 
! }; g* l' D- |8 @% o. u
                                }! T; w$ t0 s! C, h$ _! U; r: H

Val=pLuCal(hFor,pPara);        //计算表达式的值1 ^/ e- P( G2 E) t

cout<<Val.x<<endl;: t4 @3 _# \+ i. A( W4 x

}6 j/ A& `* M0 y; ]* Z7 h

else 
8 T% a4 p$ V' E9 H% m( ]
                        {6 U- f  m8 ?- c6 j5 b+ ^7 B. ]

cout<<"找不到指定的函数！"<<endl;: x4 i6 Y9 f* u' q( O

}7 r/ e! \  `. I2 \( l9 ^8 S

} 
' y) Z, `1 a3 |% p4 p\\" `, }
                pUseLu(0);        //归还Lu的使用权 
4 C, y* h4 `& S! h4 \. L/ [
        }/ i  {/ \; q  m2 ?

theFreeMLu();                //释放MLu( ?% _1 F# C: z' _

}

结果：