mirror of
git://git.gnupg.org/gnupg.git
synced 2024-06-09 23:39:51 +02:00
e7429b1ced
* tests/gpgscm/ffi.scm: Move the customized exception handling and atexit logic... * tests/gpgscm/init.scm: ... here. (throw): Record the current history. (throw'): New function that is history-aware. (rethrow): New function. (*error-hook*): Use the new throw'. * tests/gpgscm/main.c (load): Fix error handling. (main): Save and use the 'sc->retcode' as exit code. * tests/gpgscm/repl.scm (repl): Print call history. * tests/gpgscm/scheme.c (_Error_1): Make a snapshot of the history, use it to provide a accurate location of the expression causing the error at runtime, and hand the history trace to the '*error-hook*'. (opexe_5): Tag all lists at parse time with the current location. * tests/gpgscm/tests.scm: Update calls to 'throw', use 'rethrow'. Signed-off-by: Justus Winter <justus@g10code.com> |
||
|---|---|---|
| .. | ||
| ffi-private.h | ||
| ffi.c | ||
| ffi.h | ||
| ffi.scm | ||
| init.scm | ||
| lib.scm | ||
| LICENSE.TinySCHEME | ||
| main.c | ||
| Makefile.am | ||
| Manual.txt | ||
| opdefines.h | ||
| private.h | ||
| repl.scm | ||
| scheme-config.h | ||
| scheme-private.h | ||
| scheme.c | ||
| scheme.h | ||
| t-child.c | ||
| t-child.scm | ||
| tests.scm | ||