summaryrefslogtreecommitdiff
path: root/libguile/stacks.c
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2018-06-21 08:43:47 +0200
committerAndy Wingo <wingo@pobox.com>2018-06-21 20:20:01 +0200
commit6ad1fc9ce067b912892dd82c944d3870205301bd (patch)
tree2953b71490c3f431bc3f36c1349b70039ea5d222 /libguile/stacks.c
parent16879cabed0e9bf218986bc886c3336a5f5a21c0 (diff)
downloadguile-6ad1fc9ce067b912892dd82c944d3870205301bd.tar.gz
Use ptrdiff_t instead of scm_t_ptrdiff
* libguile/continuations.h: * libguile/control.c: * libguile/control.h: * libguile/dynstack.c: * libguile/dynstack.h: * libguile/eval.c: * libguile/foreign.c: * libguile/frames.h: * libguile/gen-scmconfig.c: * libguile/gsubr.c: * libguile/gsubr.h: * libguile/loader.c: * libguile/numbers.h: * libguile/stacks.c: * libguile/throw.c: * libguile/vm-engine.c: * libguile/vm.c: * libguile/vm.h: Use ptrdiff_t from stddef.h.
Diffstat (limited to 'libguile/stacks.c')
-rw-r--r--libguile/stacks.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/libguile/stacks.c b/libguile/stacks.c
index dcc8d2425..1332d1d9e 100644
--- a/libguile/stacks.c
+++ b/libguile/stacks.c
@@ -101,10 +101,10 @@ stack_depth (enum scm_vm_frame_kind kind, const struct scm_frame *frame)
* encountered.
*/
-static scm_t_ptrdiff
+static ptrdiff_t
find_prompt (SCM key)
{
- scm_t_ptrdiff fp_offset;
+ ptrdiff_t fp_offset;
if (!scm_dynstack_find_prompt (&SCM_I_CURRENT_THREAD->dynstack, key,
NULL, &fp_offset, NULL, NULL, NULL))
@@ -180,7 +180,7 @@ narrow_stack (long len, enum scm_vm_frame_kind kind, struct scm_frame *frame,
else
{
/* Cut until the given prompt tag is seen. */
- scm_t_ptrdiff fp_offset = find_prompt (inner_cut);
+ ptrdiff_t fp_offset = find_prompt (inner_cut);
for (; len; len--, scm_c_frame_previous (kind, frame))
if (fp_offset == frame->fp_offset)
break;
@@ -240,7 +240,7 @@ narrow_stack (long len, enum scm_vm_frame_kind kind, struct scm_frame *frame,
/* Cut until the given prompt tag is seen. */
long i;
struct scm_frame tmp;
- scm_t_ptrdiff fp_offset = find_prompt (outer_cut);
+ ptrdiff_t fp_offset = find_prompt (outer_cut);
memcpy (&tmp, frame, sizeof tmp);