|
发表于 2006-9-15 15:37:40
|
显示全部楼层
来自: 中国江苏扬州
确定某独立名称空间当前是否加载
0 T$ I' k/ n+ T
( _0 H; r3 \/ _( B# }2 I(vl-vlx-loaded-p appname)
' U7 i3 W; ?# \2 f* s# `9 @参数
2 E) T9 ^: z, Q( p" Y3 L4 [' e9 W% t4 | e; X* ? W
appname1 l3 M8 r) R5 ], m+ e
5 _& v0 d1 R8 d' \
字符串,指定 VLX 应用程序。0 U& b @3 o" O2 E [* M# W
& j- Z" q. D5 I6 k; I
返回值
5 }/ a! t# [! j. A2 k% ^5 _! C6 ?" i. g( J7 h7 Z7 g% u
如果应用程序已经加载则返回 T,如果未加载则返回 nil。# J, C4 Q/ q, J* m9 @. a% p7 ?
) x0 v+ w* a" s) O- p9 u6 V! r
示例
% c* a! h0 `2 k- b, [4 h
# f. ~2 K6 M* e; T8 Q+ G# {检查 vlxns 应用程序是否已加载到自己的名称空间:
7 s- w; M% _/ P0 P! ^. A# _) l* v( Q2 m3 f9 t4 I2 d
命令: (vl-vlx-loaded-p "vlxns")
' M7 b# Q& C/ u5 E) e1 J* w* S( E4 v! x; _( a+ N
nil
- M# ~) `( e# @
' D1 ^& _7 g4 O应用程序未加载到自己的名称空间。/ J4 P0 I) a* ], J, I" k
+ k. b1 e# _; K0 {& |& ^现在加载 vlxns:
4 h5 F7 ~ R1 `2 u
F' l6 ]/ X+ Z& n$ r! a命令: (load "vlxns.vlx")
3 K% y; i7 q3 ]: o3 @9 Q
; D- P. I) d! {nil
3 P. |5 o* D0 h3 v' O9 ?5 _$ M( s* o7 N. B- j2 P4 Z9 E
检查 vlxns 应用程序是否成功加载:
0 m! O. P6 j& l8 o4 G# U( F9 N8 ]# v/ o
命令: (vl-vlx-loaded-p "vlxns")
% \1 g3 f! `! X( q; X
: r2 h" Y4 N: N% S6 S/ YT
6 ]0 v: J, k! X; Q$ c' B. a9 Q. }2 C# m, t0 z% h
本样例中假定 vlxns 定义为运行在自己的名称空间中。如果没有这样定义,它将被加载到当前文档的名称空间,vl-vlx-loaded-p 将返回 nil。 |
|