diff --git a/libguile/ports.h b/libguile/ports.h
index 55875b197..9022dd209 100644
--- 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))
 
 
 
diff --git a/libguile/smob.h b/libguile/smob.h
index efba996b8..b009920ce 100644
--- a/libguile/smob.h
+++ b/libguile/smob.h
@@ -57,7 +57,6 @@ typedef struct scm_smobfuns
 
 
 #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;