diff options
author | Ludovic Courtès <ludo@gnu.org> | 2020-03-17 22:31:26 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2020-03-17 22:57:41 +0100 |
commit | 62d1335a613dc140d3d147ee0bc83b1a6072d08d (patch) | |
tree | 0de5c77556538e183cec105e44a54b2659bd47a3 | |
parent | 40f9a44c1b8c24c46488bcf1474d70125c0aee8f (diff) | |
download | guile-62d1335a613dc140d3d147ee0bc83b1a6072d08d.tar.gz |
gdb: Use <stdint.h> types.
* libguile/libguile-3.0-gdb.scm (vm-frame): Look up stdint.h types
instead of now-deprecated "scm_t_" types.
-rw-r--r-- | libguile/libguile-3.0-gdb.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libguile/libguile-3.0-gdb.scm b/libguile/libguile-3.0-gdb.scm index 9989c9f55..d3c99f7d8 100644 --- a/libguile/libguile-3.0-gdb.scm +++ b/libguile/libguile-3.0-gdb.scm @@ -182,8 +182,8 @@ if the information is not available." ;; See libguile/frames.h. (define* (vm-frame ip sp fp #:optional (backend %gdb-memory-backend)) "Return the components of the stack frame at FP." - (define ip-type (type-pointer (lookup-type "scm_t_uint32"))) - (define uint-type (type-pointer (lookup-type "scm_t_uintptr"))) + (define ip-type (type-pointer (lookup-type "uint32_t"))) + (define uint-type (type-pointer (lookup-type "uintptr_t"))) (make-vm-frame ip sp |