diff options
| author | Lukas Larsson <[email protected]> | 2019-01-15 16:41:06 +0100 |
|---|---|---|
| committer | Lukas Larsson <[email protected]> | 2019-01-15 16:41:06 +0100 |
| commit | 93f5c765236c9bd18559461604fb51687908bf78 (patch) | |
| tree | 0364ab290ffa262b23e3ffb458a18054020a2eaa /erts/emulator/beam/utils.c | |
| parent | 640851869321694b57f701399c19e093d9bd1dad (diff) | |
| parent | 337e8a45ef9e8a6cbe91d004d9bb06a8371eb719 (diff) | |
| download | otp-93f5c765236c9bd18559461604fb51687908bf78.tar.gz otp-93f5c765236c9bd18559461604fb51687908bf78.tar.bz2 otp-93f5c765236c9bd18559461604fb51687908bf78.zip | |
Merge branch 'maint'
Diffstat (limited to 'erts/emulator/beam/utils.c')
| -rw-r--r-- | erts/emulator/beam/utils.c | 55 |
1 files changed, 0 insertions, 55 deletions
diff --git a/erts/emulator/beam/utils.c b/erts/emulator/beam/utils.c index bf5a968f66..1e7b494a91 100644 --- a/erts/emulator/beam/utils.c +++ b/erts/emulator/beam/utils.c @@ -4788,58 +4788,3 @@ erts_ptr_id(void *ptr) return ptr; } -#ifdef DEBUG -/* - * Handy functions when using a debugger - don't use in the code! - */ - -void upp(byte *buf, size_t sz) -{ - bin_write(ERTS_PRINT_STDERR, NULL, buf, sz); -} - -void pat(Eterm atom) -{ - upp(atom_tab(atom_val(atom))->name, - atom_tab(atom_val(atom))->len); -} - - -void pinfo() -{ - process_info(ERTS_PRINT_STDOUT, NULL); -} - - -void pp(p) -Process *p; -{ - if(p) - print_process_info(ERTS_PRINT_STDERR, NULL, p); -} - -void ppi(Eterm pid) -{ - pp(erts_proc_lookup(pid)); -} - -void td(Eterm x) -{ - erts_fprintf(stderr, "%T\n", x); -} - -void -ps(Process* p, Eterm* stop) -{ - Eterm* sp = STACK_START(p) - 1; - - if (stop <= STACK_END(p)) { - stop = STACK_END(p) + 1; - } - - while(sp >= stop) { - erts_printf("%p: %.75T\n", sp, *sp); - sp--; - } -} -#endif |