common-lisp/sbcl.sbcl
1
0
Fork 0
mirror of git://git.code.sf.net/p/sbcl/sbcl synced 2026-09-10 07:26:40 -04:00
Code Issues Actions 8 Packages Projects Releases Wiki Activity

Use more asterisks. Fixes (TRACE :ENCAPSULATE NIL) tests

Browse source
This commit is contained in:
Douglas Katzman 2022-01-27 13:39:22 -05:00
parent 29863ccece
commit df845b7410
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/runtime/sparc-arch.c
View file

@ -231,9 +231,9 @@ arch_handle_after_breakpoint(os_context_t *context)
*skipped_break_addr = trap_Breakpoint;
os_flush_icache(skipped_break_addr, sizeof(unsigned int));
skipped_break_addr = NULL;
*(unsigned long *) os_context_pc_addr(context) = displaced_after_inst;
*(unsigned long *)*os_context_pc_addr(context) = displaced_after_inst;
/* context->sigmask = orig_sigmask; */
os_flush_icache((os_vm_address_t) os_context_pc_addr(context), sizeof(unsigned int));
os_flush_icache((os_vm_address_t) *os_context_pc_addr(context), sizeof(unsigned int));
}
void