Provide `int', `long', `size_t', etc. in `(system foreign)'.
authorLudovic Courtès <ludo@gnu.org>
Tue, 16 Mar 2010 23:45:57 +0000 (00:45 +0100)
committerLudovic Courtès <ludo@gnu.org>
Tue, 16 Mar 2010 23:54:01 +0000 (00:54 +0100)
commitdd1464bf38c5e2dc71652b62f63e4bcf93179a14
tree34622829defb07702cfc99836707b86065e94f43
parent3023e7b0c90081f0060cb78a4a534ed7cd77c9bf
Provide `int', `long', `size_t', etc. in `(system foreign)'.

* libguile/foreign.c (sym_int, sym_long, sym_unsigned_int,
  sym_unsigned_long, sym_size_t): New variables.
  (scm_init_foreign): Define them at the Scheme level.

* module/system/foreign.scm (int, unsigned-int, long,
  unsigned-long, size_t): New exported bindings.
libguile/foreign.c
module/system/foreign.scm