diff options
author | Ludovic Courtès <ludo@gnu.org> | 2010-04-09 00:30:10 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2010-04-09 00:32:15 +0200 |
commit | 01ad5a7ba9edb5d8c96567ed80ea1a34019c5338 (patch) | |
tree | 0e99da198557e8718718377432f0771c45f7025a /libguile/eval.c | |
parent | 4551e860f02244ffb3858c941319f1613bac40e4 (diff) | |
download | guile-01ad5a7ba9edb5d8c96567ed80ea1a34019c5338.tar.gz |
Raise an error when attempting to modify the value of `%null-pointer'.
* libguile/foreign.c (sym_null_pointer_error): New variable.
(null_pointer_error): New function.
(scm_foreign_set_x): Raise an error if attempting to modify
NULL_POINTER.
(scm_foreign_to_bytevector): Use `null_pointer_error ()' instead of
`scm_misc_error ()'.
* test-suite/tests/foreign.test: New file.
* test-suite/Makefile.am (SCM_TESTS): Add tests/foreign.test.
* test-suite/lib.scm (exception:null-pointer-error): New variable.
Diffstat (limited to 'libguile/eval.c')
0 files changed, 0 insertions, 0 deletions