diff options
author | Andy Wingo <wingo@pobox.com> | 2011-05-15 15:28:50 +0200 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2011-05-15 15:34:16 +0200 |
commit | 44e5b410bd19655f14c7e50f7a823fcc8c6ec97f (patch) | |
tree | 9f8620f84d5b3ffc8b35efbf398a25e5e0f6d56b /libguile/__scm.h | |
parent | 4765b28f702a42da770a13861d1035ec8c939304 (diff) | |
download | guile-44e5b410bd19655f14c7e50f7a823fcc8c6ec97f.tar.gz |
remove SCM_EXIT_SUCCESS and SCM_EXIT_FAILURE definitions
* libguile/__scm.h: Remove unused SCM_EXIT_SUCCESS and SCM_EXIT_FAILURE
definitions.
Diffstat (limited to 'libguile/__scm.h')
-rw-r--r-- | libguile/__scm.h | 21 |
1 files changed, 0 insertions, 21 deletions
diff --git a/libguile/__scm.h b/libguile/__scm.h index c437d60ae..19fcce8ed 100644 --- a/libguile/__scm.h +++ b/libguile/__scm.h @@ -420,27 +420,6 @@ typedef long SCM_STACKITEM; -/* SCM_EXIT_SUCCESS is the default code to return from SCM if no errors - * were encountered. SCM_EXIT_FAILURE is the default code to return from - * SCM if errors were encountered. The return code can be explicitly - * specified in a SCM program with (scm_quit <n>). - */ - -#ifndef SCM_EXIT_SUCCESS -#ifdef vms -#define SCM_EXIT_SUCCESS 1 -#else -#define SCM_EXIT_SUCCESS 0 -#endif /* def vms */ -#endif /* ndef SCM_EXIT_SUCCESS */ -#ifndef SCM_EXIT_FAILURE -#ifdef vms -#define SCM_EXIT_FAILURE 2 -#else -#define SCM_EXIT_FAILURE 1 -#endif /* def vms */ -#endif /* ndef SCM_EXIT_FAILURE */ - /* Define SCM_C_INLINE_KEYWORD so that it can be used as a replacement for the "inline" keyword, expanding to nothing when "inline" is not available. |