mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2025-06-05 16:14:12 +00:00
Code Issues 1 Releases Wiki Activity

Merge pull request #991 from pepe/master

Browse Source 
Trace function to the stderr
This commit is contained in:
Calvin Rose 2022-07-02 09:29:18 -05:00 committed by GitHub
commit 9f35f0837e
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/core/vm.c
View File

@ -220,14 +220,14 @@
/* Trace a function call */ /* Trace a function call */
static void vm_do_trace(JanetFunction *func, int32_t argc, const Janet *argv) { static void vm_do_trace(JanetFunction *func, int32_t argc, const Janet *argv) {
if (func->def->name) { if (func->def->name) {
janet_printf("trace (%S", func->def->name); janet_eprintf("trace (%S", func->def->name);
} else { } else {
janet_printf("trace (%p", janet_wrap_function(func)); janet_eprintf("trace (%p", janet_wrap_function(func));
} }
for (int32_t i = 0; i < argc; i++) { for (int32_t i = 0; i < argc; i++) {
janet_printf(" %p", argv[i]); janet_eprintf(" %p", argv[i]);
} }
janet_printf(")\n"); janet_eprintf(")\n");
} }
/* Invoke a method once we have looked it up */ /* Invoke a method once we have looked it up */