mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-01 12:20:26 +02:00
Code Activity

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

Browse source 
* smob.h: (SCM_PTOBNUM): Removed entirely; this definition is a
duplicate.
This commit is contained in:
Jim Blandy 1997-01-08 01:51:14 +00:00
parent 198befde13
commit ce71f796b6
2 changed files with 1 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/ports.h
View file

@ -150,7 +150,7 @@ typedef struct scm_ptobfuns
int (*fclose) SCM_P ((SCM stream)); int (*fclose) SCM_P ((SCM stream));
} scm_ptobfuns; } scm_ptobfuns;
#define SCM_PTOBNUM(x) (0x0ff & (SCM_CAR(x)>>8)); #define SCM_PTOBNUM(x) (0x0ff & (SCM_CAR(x)>>8))

1
libguile/smob.h
View file

@ -57,7 +57,6 @@ typedef struct scm_smobfuns
#define SCM_SMOBNUM(x) (0x0ff & (SCM_CAR(x)>>8)) #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_sizet scm_numsmob;
extern scm_smobfuns *scm_smobs; extern scm_smobfuns *scm_smobs;