Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-07-07 05:06:37 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

fixing definition of trunc for plan9

Browse source
This commit is contained in:
Alex Shinn 2009-07-14 01:36:37 +09:00
parent fba75390b7
commit e780c122c0
1 changed files with 2 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
include/chibi/config.h
View file

@ -110,9 +110,8 @@
#define exit_normally() exits(NULL) #define exit_normally() exits(NULL)
#define strcasecmp cistrcmp #define strcasecmp cistrcmp
#define strncasecmp cistrncmp #define strncasecmp cistrncmp
/* XXXX these are wrong */ #define round(x) floor((x)+0.5)
#define trunc floor #define trunc(x) ((x)-((x)-round(x)))
#define round(x) floor(x+0.5)
#else #else