atoms-family 返回由当前已定义的符号组成的一个表
<P id=crleadin class=cr_leadin>返回由当前已定义的符号组成的一个表</P><PRE class=prog_in_end>(atoms-family format ) </PRE><P class=Heading-2>参数</P>
<P class=define_head>format</P>
<P class=define_text>值为 0 或 1 的整数，它用于指定 atoms-family 函数返回符号名的格式：</P>
<P class=define_text><SPAN class=CharSansBold>0</SPAN> 以表的形式返回符号名</P>
<P class=define_text><SPAN class=CharSansBold>1</SPAN> 以字符串表的形式返回符号名</P>
<P class=define_head>symlist</P>
<P class=define_text>用于指定用户想搜索的符号名的字符串表。</P>
<P class=Heading-2>返回值</P>
<P class=body>符号表。如果指定了 symlist，atoms-family 返回当前定义的指定符号，对那些没有定义的符号返回 nil。</P>
<P class=Heading-2>示例</P>
<P class=prompt_end>命令： (atoms-family 0)</P>
<P class=prompt_end>(BNS_PRE_SEL FITSTR2LEN C:AI_SPHERE ALERT DEFUN C:BEXTEND REM_GROUP </P>
<P class=prompt_end>B_RESTORE_SYSVARS BNS_CMD_EXIT LISPED FNSPLITL...</P>
<P class=body>下列代码检验符号 CAR、CDR 和 XYZ 是否已被定义并将其以字符串表形式返回：</P>
<P class=prompt_end>命令： <SPAN class=CharSansBold>(atoms-family 1 '("CAR" "CDR" "XYZ"))</SPAN> </P>
<P class=prompt_end>("CAR" "CDR" nil)</P>
<P class=body>这个返回的字符串表表明符号 XYZ 没有被定义。</P> 示例预留
页:
[1]