23 lines
595 B
Plaintext
23 lines
595 B
Plaintext
/* NetRexx */
|
|
options replace format comments java crossref symbols nobinary
|
|
|
|
class RStackTraces
|
|
method inner() static
|
|
StackTracer.printStackTrace()
|
|
method middle() static
|
|
inner()
|
|
method outer() static
|
|
middle()
|
|
method main(args = String[]) public static
|
|
outer()
|
|
|
|
class RStackTraces.StackTracer
|
|
method printStackTrace() public static
|
|
elems = Thread.currentThread().getStackTrace()
|
|
say 'Stack trace:'
|
|
j_ = 2
|
|
loop i_ = elems.length - 1 to 2 by -1
|
|
say ''.left(j_) || elems[i_].getClassName()'.'elems[i_].getMethodName()
|
|
j_ = j_ + 2
|
|
end i_
|