|
|
发表于 2006-9-15 15:37:40
|
显示全部楼层
来自： 中国江苏扬州
确定某独立名称空间当前是否加载
$ {+ I0 x5 J2 p# Y4 C$ T% Y! N2 N" z- O- Z+ }/ l
(vl-vlx-loaded-p appname)
6 [6 Z5 [8 j! m+ r% z# b4 F参数, d* W" }6 |+ B# [1 m, @
% Q' x4 }- \: g1 Z1 Nappname
, h% x: d7 t- [( J) g2 q/ U W/ i! G- P! i' o# ?5 M* c
字符串，指定 VLX 应用程序。, D$ V* o+ [+ B8 n- N8 A
4 X7 w% o: B, H" y$ c: {+ y返回值/ F# e! e5 y X5 ]# q& o' _; t
! N& {8 {1 y# n7 A
如果应用程序已经加载则返回 T，如果未加载则返回 nil。 D* ]. L6 b7 F- ^ G- N
8 O3 D, S5 ^2 I( [) \1 @
示例$ n( @2 }$ o" W% K
. v J6 y7 z2 e% P& M检查 vlxns 应用程序是否已加载到自己的名称空间：
+ N a6 Y5 U( ^
% b; H6 j: v( b) M& f, W" k- p7 A" r0 C5 n命令： (vl-vlx-loaded-p "vlxns") * k9 i$ }7 Z1 w j0 R6 Y9 i
2 I* T: O& r9 L' q9 d7 r! X
nil2 d/ s3 D2 |) Y9 C
$ r& T. y9 y/ T2 u2 l3 M y应用程序未加载到自己的名称空间。
8 z. F3 {" m2 F) q* A3 J. V& i; l* I, N9 Z9 \6 j' _2 H
现在加载 vlxns：' x- j$ v8 Z9 g; q2 G
& T; X q% n$ k; w2 K5 K5 f
命令： (load "vlxns.vlx") 1 B3 l; P) `; W) V* `4 Z
( g8 N" c2 ~! b8 D7 C8 m4 Mnil8 B; y" I- f% Q' F. s! m
4 m/ [- j9 o. [) w, L9 Z' Z
检查 vlxns 应用程序是否成功加载：+ C u/ t3 U, a0 k0 y9 X
# N$ M9 [+ m3 }
命令： (vl-vlx-loaded-p "vlxns") . a$ E# w& Z1 G) R1 @, s& R2 d
7 ^2 h' A$ `# T% r5 v2 C& W' S
T8 F' ?. Q. [* e4 D
' C: ~5 R+ A3 m. X& p5 P本样例中假定 vlxns 定义为运行在自己的名称空间中。如果没有这样定义，它将被加载到当前文档的名称空间，vl-vlx-loaded-p 将返回 nil。 |
|
