|
|
发表于 2006-9-15 15:37:40
|
显示全部楼层
来自: 中国江苏扬州
确定某独立名称空间当前是否加载4 n) S- h/ ^$ y6 y. R
! m% w P, Y4 c(vl-vlx-loaded-p appname) / h4 H D1 b& K4 F& o- F0 T
参数$ A0 N! [7 N! U! H7 }
1 N: C! E. B/ }4 O0 y2 _appname+ ~ s; v$ Y; X$ |& `1 m8 _
$ Y1 c5 I8 X/ Q8 `& {2 }$ u9 Y
字符串,指定 VLX 应用程序。" `. j$ K# |* C: A( c: [
4 d6 Z+ }& m8 W8 G
返回值
7 E4 h/ a( Y. v0 j$ s$ s s, G3 N) o5 B) L' B1 _6 I
如果应用程序已经加载则返回 T,如果未加载则返回 nil。1 @+ X, ?1 E: M: t" _
! P2 V) H4 A" n- p1 n- v示例/ R* e0 V% i. @( K1 J6 ?
# G+ f* M9 U, N2 S1 M检查 vlxns 应用程序是否已加载到自己的名称空间:/ b* M4 [9 v8 f) n' E( O& z
! P5 M9 }; w9 y
命令: (vl-vlx-loaded-p "vlxns")
/ h$ o8 s( B' j2 j1 x' w
[0 }, N; H6 n2 y1 N3 L, w) \nil
% S( W/ c/ B4 A: G, U
) k" `0 s6 @2 ^: H7 O1 n应用程序未加载到自己的名称空间。
3 m( `0 i% J; U D8 d# [, a3 s9 Q
现在加载 vlxns:: p5 Q4 x3 d& v8 `0 C6 [
0 R, G( a- g+ ~9 o& U# q命令: (load "vlxns.vlx") 9 t# T8 }% G' v3 a$ l- W
+ Y0 c3 B2 k2 p; N7 }; l
nil
0 j, u0 J' J6 S1 `8 Y. c
8 m Y; G( e. `1 p2 L检查 vlxns 应用程序是否成功加载:
1 a7 z4 [* N$ y) l; D9 F. x7 t# E' d( b- B
命令: (vl-vlx-loaded-p "vlxns")
, P! O9 }3 r) h; R p. R/ W: T/ s! o' ?* R: [* ~3 N" Q
T6 C' e" G# P! U6 R% ?8 G
+ j% j% i( J6 D本样例中假定 vlxns 定义为运行在自己的名称空间中。如果没有这样定义,它将被加载到当前文档的名称空间,vl-vlx-loaded-p 将返回 nil。 |
|