diff options
author | Rich Hickey <richhickey@gmail.com> | 2006-05-09 15:07:09 +0000 |
---|---|---|
committer | Rich Hickey <richhickey@gmail.com> | 2006-05-09 15:07:09 +0000 |
commit | 92f063f24226b5b933dbd0bc0b0bb2e153954cfd (patch) | |
tree | 20c69407191f818f197cab1ff84014b6c25321d8 /src/lisp/test.lisp | |
parent | c403c6e6f13d19e43d4f7dbab9dcb40fe9781f76 (diff) |
added instance?
Diffstat (limited to 'src/lisp/test.lisp')
-rw-r--r-- | src/lisp/test.lisp | 5 |
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)) |