Commit 71f86838 authored by Mark's avatar Mark

Tests for finding Java call sites

parent fc96a46e
......@@ -9,6 +9,14 @@
nil
"Calling java.lang.Short.reverseBytes(short)")
(prove:plan 1)
(prove:isnt
(handler-case
(java:jstatic-raw "valueOf" "java.lang.Byte" #x7f)
(error (e) (format *standard-output* "error: ~a~%" e)))
nil
"Calling java.lang.Byte.valueOf(byte)")
;; <http://trac.common-lisp.net/armedbear/ticket/259>
(prove:plan 1)
(prove:isnt
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment