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

fixes for linux

Browse source
This commit is contained in:
Alex Shinn 2009-04-08 10:19:16 -04:00
parent 8a5cfbddc0
commit b4aaf9b386
3 changed files with 5 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
defaults.h
View file

@ -13,6 +13,7 @@
#define SEXP_BSD 1 #define SEXP_BSD 1
#else #else
#define SEXP_BSD 0 #define SEXP_BSD 0
#define _GNU_SOURCE
#endif #endif
#ifndef USE_BOEHM #ifndef USE_BOEHM

2
sexp.c
View file

@ -559,7 +559,7 @@ sexp sexp_get_output_string (sexp port) {
fflush(sexp_port_stream(port)); fflush(sexp_port_stream(port));
return sexp_substring(cookie, return sexp_substring(cookie,
sexp_make_integer(0), sexp_make_integer(0),
sexp_string_length(cookie)); sexp_make_integer(sexp_string_length(cookie)));
} }
#endif #endif

6
sexp.h
View file

@ -5,6 +5,9 @@
#ifndef SEXP_H #ifndef SEXP_H
#define SEXP_H #define SEXP_H
#include "config.h"
#include "defaults.h"
#include <ctype.h> #include <ctype.h>
#include <stdio.h> #include <stdio.h>
#include <stdlib.h> #include <stdlib.h>
@ -13,9 +16,6 @@
#include <sysexits.h> #include <sysexits.h>
#include <math.h> #include <math.h>
#include "config.h"
#include "defaults.h"
/* tagging system /* tagging system
* bits end in 00: pointer * bits end in 00: pointer
* 01: fixnum * 01: fixnum