summaryrefslogtreecommitdiff
path: root/libguile/__scm.h
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2011-05-15 15:28:50 +0200
committerAndy Wingo <wingo@pobox.com>2011-05-15 15:34:16 +0200
commit44e5b410bd19655f14c7e50f7a823fcc8c6ec97f (patch)
tree9f8620f84d5b3ffc8b35efbf398a25e5e0f6d56b /libguile/__scm.h
parent4765b28f702a42da770a13861d1035ec8c939304 (diff)
downloadguile-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.h21
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.