PTRINT in unrandomize.h - gcl.git - GNU Common Lisp

index : gcl.git
GNU Common Lisp
summary refs log tree commit diff
diff options
context:
space:
mode:
authorCamm Maguire <camm@debian.org>2014年12月03日 13:57:36 -0500
committerCamm Maguire <camm@debian.org>2014年12月03日 13:57:36 -0500
commit1933206381bdd3011ea69f1b9cd3a204637f121a (patch)
tree98a0bec7e0b5f17bc351be3443e0d3ee7985a461
parentb536d0fcf30d47cd3a6be6ed113337cd63742344 (diff)
downloadgcl-ptrint_fixnum.tar.gz
PTRINT in unrandomize.hptrint_fixnum
Diffstat
-rw-r--r--gcl/h/unrandomize.h 6
1 files changed, 3 insertions, 3 deletions
diff --git a/gcl/h/unrandomize.h b/gcl/h/unrandomize.h
index a94701417..b269d6a58 100644
--- a/gcl/h/unrandomize.h
+++ b/gcl/h/unrandomize.h
@@ -11,10 +11,10 @@
{
/*READ_IMPLIES_EXEC is for selinux, but selinux will reset it in the child*/
- fixnum pers = personality(READ_IMPLIES_EXEC|personality(0xffffffffUL));
- fixnum flag = ADDR_NO_RANDOMIZE;
+ PTRINT pers = personality(READ_IMPLIES_EXEC|personality(0xffffffffUL));
+ PTRINT flag = ADDR_NO_RANDOMIZE;
- if (sizeof(fixnum)==4) flag|=ADDR_LIMIT_3GB|ADDR_COMPAT_LAYOUT;
+ if (sizeof(PTRINT)==4) flag|=ADDR_LIMIT_3GB|ADDR_COMPAT_LAYOUT;
if (pers==-1) {printf("personality failure %d\n",errno);exit(-1);}
if ((pers & flag)!=flag && !getenv("GCL_UNRANDOMIZE")) {
generated by cgit v1.2.3 (git 2.39.1) at 2025年09月01日 17:56:58 +0000

AltStyle によって変換されたページ (->オリジナル) /