~ chicken-core (chicken-5) ac83e67c5ee6fdddde212eb5edeeedf1421451f8
commit ac83e67c5ee6fdddde212eb5edeeedf1421451f8 Author: Peter Bex <peter.bex@xs4all.nl> AuthorDate: Fri Nov 8 16:59:25 2013 +0100 Commit: Peter Bex <peter.bex@xs4all.nl> CommitDate: Fri Nov 8 16:59:25 2013 +0100 Remove unused and silly C_invert_flag macro diff --git a/chicken.h b/chicken.h index 0ef4cc13..5c932ac2 100644 --- a/chicken.h +++ b/chicken.h @@ -1105,7 +1105,6 @@ extern double trunc(double); #define C_mk_nbool(x) ((x) ? C_SCHEME_FALSE : C_SCHEME_TRUE) #define C_port_file(p) C_CHECKp(p,C_portp(C_VAL1(p)),(C_FILEPTR)C_block_item(C_VAL1(p), 0)) #define C_data_pointer(b) C_CHECKp(b,C_blockp((C_word)C_VAL1(b)),(void *)(((C_SCHEME_BLOCK *)(C_VAL1(b)))->data)) -#define C_invert_flag(f) (!(f)) #define C_fitsinfixnump(n) (((n) & C_INT_SIGN_BIT) == (((n) & C_INT_TOP_BIT) << 1)) #define C_ufitsinfixnump(n) (((n) & (C_INT_SIGN_BIT | (C_INT_SIGN_BIT >> 1))) == 0) #define C_quickflonumtruncate(n) (C_fix((C_word)C_flonum_magnitude(n)))Trap