added CompiledMethod>>sourceFile, CompiledMethod>>sourceLine.
added pf_method_get_source_file(). enhanced moo_addmethodtodbginfo(). enhanced the compiler to call moo_addfiletodbginfo(), moo_addmethodtodbginfo()
This commit is contained in:
@ -346,4 +346,11 @@ class(#pointer) CompiledMethod(Object)
|
||||
{
|
||||
^self.name
|
||||
}
|
||||
|
||||
method(#primitive) sourceFile.
|
||||
|
||||
method sourceLine
|
||||
{
|
||||
^self.source_line
|
||||
}
|
||||
}
|
||||
|
@ -74,7 +74,7 @@ System logNl: "== BACKTRACE ==".
|
||||
ctx := thisContext.
|
||||
while (ctx notNil)
|
||||
{
|
||||
if (ctx class == MethodContext) { System logNl: (" " & ctx method owner name & ">>" & ctx method name) }.
|
||||
if (ctx class == MethodContext) { System logNl: (" " & ctx method owner name & ">>" & ctx method name & " (" & ctx method sourceFile & " " & ctx method sourceLine asString & ")"). }.
|
||||
// TODO: include blockcontext???
|
||||
ctx := ctx sender.
|
||||
}.
|
||||
|
Reference in New Issue
Block a user