summaryrefslogtreecommitdiff
path: root/src/lisp/test.lisp
diff options
context:
space:
mode:
authorRich Hickey <richhickey@gmail.com>2006-05-09 15:07:09 +0000
committerRich Hickey <richhickey@gmail.com>2006-05-09 15:07:09 +0000
commit92f063f24226b5b933dbd0bc0b0bb2e153954cfd (patch)
tree20c69407191f818f197cab1ff84014b6c25321d8 /src/lisp/test.lisp
parentc403c6e6f13d19e43d4f7dbab9dcb40fe9781f76 (diff)
added instance?
Diffstat (limited to 'src/lisp/test.lisp')
-rw-r--r--src/lisp/test.lisp5
1 files changed, 5 insertions, 0 deletions
diff --git a/src/lisp/test.lisp b/src/lisp/test.lisp
index b5a82a98..a469186e 100644
--- a/src/lisp/test.lisp
+++ b/src/lisp/test.lisp
@@ -137,6 +137,11 @@
Math.PI)
(set Math.PI 3.14))
+(defn finst (x)
+ (if (instance? x String.)
+ 1
+ 2))
+
(defn prn (x)
#+:JVM (.println System.out x)
#+:CLI (Console.WriteLine x))