* ports.h (SCM_PTOBNUM): Removed extraneous semicolon.

* smob.h: (SCM_PTOBNUM): Removed entirely; this definition is a
duplicate.

diff --git a/libguile/ports.h b/libguile/ports.h
index 55875b1..9022dd2 100644 (file)
--- a/libguile/ports.h
+++ b/libguile/ports.h
@@ -150,7 +150,7 @@ typedef struct scm_ptobfuns
   int (*fclose) SCM_P ((SCM stream));
 } scm_ptobfuns;
 
-#define SCM_PTOBNUM(x) (0x0ff & (SCM_CAR(x)>>8));
+#define SCM_PTOBNUM(x) (0x0ff & (SCM_CAR(x)>>8))
 
 \f
 

diff --git a/libguile/smob.h b/libguile/smob.h
index efba996..b009920 100644 (file)
--- a/libguile/smob.h
+++ b/libguile/smob.h
@@ -57,7 +57,6 @@ typedef struct scm_smobfuns
 \f
 
 #define SCM_SMOBNUM(x) (0x0ff & (SCM_CAR(x)>>8))
-#define SCM_PTOBNUM(x) (0x0ff & (SCM_CAR(x)>>8))
 
 extern scm_sizet scm_numsmob;
 extern scm_smobfuns *scm_smobs;