Last change
on this file was
15571,
checked in by Mark Evenson, 3 years ago
|
Update to javaparser 3.24.2. Fix tests. Fix typo: ignoreable -> ignorable. Have invoke load javaparser first time #1 is used.
|
File size:
1.2 KB
|
Line | |
---|
1 | (in-package :cl-user) |
---|
2 | |
---|
3 | (defparameter expanded '(let ((jss::this jss::*object-for-this*)) |
---|
4 | (declare (ignorable jss::this)) |
---|
5 | (jcall "getLoaded" |
---|
6 | (jcall "load" |
---|
7 | (jcall "make" |
---|
8 | (jcall "intercept" |
---|
9 | (jcall "method" |
---|
10 | (jcall "subclass" |
---|
11 | (new '|ByteBuddy|) |
---|
12 | (find-java-class '|Object|) |
---|
13 | t) |
---|
14 | (jstatic "named" |
---|
15 | (find-java-class '|ElementMatchers|) |
---|
16 | "toString")) |
---|
17 | (jstatic "value" |
---|
18 | (find-java-class '|FixedValue|) |
---|
19 | "Hello World!"))) |
---|
20 | (jcall "getClassLoader" |
---|
21 | (jcall "getClass" jss::this)))))) |
---|
22 | |
---|
23 | (defparameter source '#1"new ByteBuddy().subclass(Object.class,t) |
---|
24 | .method(ElementMatchers.named("toString")) |
---|
25 | .intercept(FixedValue.value("Hello World!")) |
---|
26 | .make() |
---|
27 | .load(getClass().getClassLoader()) |
---|
28 | .getLoaded()" ) |
---|
29 | |
---|
30 | (prove:plan 1) |
---|
31 | (prove:is source expanded) |
---|
32 | |
---|
33 | (prove:finalize) |
---|
Note: See
TracBrowser
for help on using the repository browser.