diff options
author | perry <perry> | 1999-07-20 18:40:42 +0000 |
---|---|---|
committer | perry <perry> | 1999-07-20 18:40:42 +0000 |
commit | b1fbb00423a61e738df12fc65050128143c5f957 (patch) | |
tree | 253cf1b0b59cb091dc684644173ec4a169c62189 | |
parent | b8151a25baab0cee92debd3b9a5e134d8be6e948 (diff) | |
download | pkgsrc-b1fbb00423a61e738df12fc65050128143c5f957.tar.gz |
add a patch from the scwm people -- won't be needed in the next guile release.
-rw-r--r-- | lang/guile/patches/patch-ab | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/lang/guile/patches/patch-ab b/lang/guile/patches/patch-ab new file mode 100644 index 00000000000..0233f0cc9ec --- /dev/null +++ b/lang/guile/patches/patch-ab @@ -0,0 +1,15 @@ +$NetBSD: patch-ab,v 1.5 1999/07/20 18:40:42 perry Exp $ + +--- libguile/ports.h 1998/10/30 08:22:50 1.33 ++++ libguile/ports.h 1998/11/05 16:02:55 1.34 +@@ -93,7 +93,7 @@ + #define SCM_CRDY (32L<<16) /* Should char-ready? return #t? */ + + /* A mask used to clear the char-ready port flag. */ +-#define SCM_CUC 0x001fffffL ++#define SCM_CUC (~SCM_CRDY) + + #define SCM_PORTP(x) (SCM_TYP7(x)==scm_tc7_port) + #define SCM_OPPORTP(x) (((0x7f | SCM_OPN) & SCM_CAR(x))==(scm_tc7_port | SCM_OPN)) + + |