diff options
| author | William S Fulton <wsf@fultondesigns.co.uk> | 2022-09-18 19:34:11 +0100 |
|---|---|---|
| committer | William S Fulton <wsf@fultondesigns.co.uk> | 2022-09-19 09:09:29 +0100 |
| commit | 034e2358f9302983cd974746a548d10b45b46cf1 (patch) | |
| tree | b8eee67f17e7cc26ae40fa7f642752e3fe7bbbfc /Lib | |
| parent | d32943b2a97c8da986930c8987a3b24afe9aef4b (diff) | |
| download | swig-034e2358f9302983cd974746a548d10b45b46cf1.tar.gz | |
Add Racket throws typemaps for char *
Diffstat (limited to 'Lib')
| -rw-r--r-- | Lib/mzscheme/typemaps.i | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/Lib/mzscheme/typemaps.i b/Lib/mzscheme/typemaps.i index 25c7b7707..6c31aea52 100644 --- a/Lib/mzscheme/typemaps.i +++ b/Lib/mzscheme/typemaps.i @@ -290,6 +290,10 @@ REF_MAP(float, SCHEME_REALP, scheme_real_to_double, REF_MAP(double, SCHEME_REALP, scheme_real_to_double, scheme_make_double, real); +%typemap(throws) char * { + scheme_signal_error("%s: %s", FUNC_NAME, $1); +} + /* Void */ %typemap(out) void "$result = scheme_void;" |