「Defun-q-list-ref」の版間の差分

2013年2月27日 (水) 10:29時点における版

構文: (defun-q-list-ref 'function)

機能: defun-q 関数で定義された関数のリスト構造を表示する。

引数

function : 関数名のシンボル。

戻り値: 関数のリスト定義。関数がリストとして定義されていない場合は、nil。

サンプル

; defun-q 関数を使用して関数を定義。
(defun-q my-startup (x) (print (list x))) 
MY-STARTUP 
; defun-q-list-ref 関数を使用して、my-startup のリスト構造を表示。
(defun-q-list-ref 'my-startup) 
((X) (PRINT (LIST X)))

@@ 14行目: / 14行目: @@
 ; サンプル
-: defun-q 関数を使用して関数を定義。
+<pre class="brush:autolisp;">
-: (defun-q my-startup (x) (print (list x)))
+; defun-q 関数を使用して関数を定義。
-: MY-STARTUP
+(defun-q my-startup (x) (print (list x)))
-: defun-q-list-ref 関数を使用して、my-startup のリスト構造を表示。
+MY-STARTUP
-: (defun-q-list-ref 'my-startup)
+; defun-q-list-ref 関数を使用して、my-startup のリスト構造を表示。
-: '''((X) (PRINT (LIST X)))'''
+(defun-q-list-ref 'my-startup)
+((X) (PRINT (LIST X)))
+</pre>
 -----