guile-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Guile-commits] 79/86: Rename __scm.h to scm.h


From: Andy Wingo
Subject: [Guile-commits] 79/86: Rename __scm.h to scm.h
Date: Wed, 20 Jun 2018 14:09:45 -0400 (EDT)

wingo pushed a commit to branch master
in repository guile.

commit 97cc65fee47997b4fe542507fa3e607a255d6d73
Author: Andy Wingo <address@hidden>
Date:   Wed Jun 20 16:33:05 2018 +0200

    Rename __scm.h to scm.h
    
    * libguile/scm.h: Rename.  Update all includers.
---
 guile-readline/readline.h      | 6 +++---
 libguile.h                     | 2 +-
 libguile/Makefile.am           | 1 +
 libguile/alist.h               | 1 -
 libguile/array-handle.c        | 1 -
 libguile/array-handle.h        | 1 -
 libguile/array-map.h           | 2 +-
 libguile/arrays.c              | 1 -
 libguile/arrays.h              | 1 -
 libguile/async.h               | 1 -
 libguile/atomic.h              | 1 -
 libguile/backtrace.h           | 2 +-
 libguile/bitvectors.c          | 1 -
 libguile/bitvectors.h          | 1 -
 libguile/boolean.c             | 2 +-
 libguile/boolean.h             | 8 ++++----
 libguile/bytevectors.h         | 1 -
 libguile/cache-internal.h      | 3 +--
 libguile/chars.h               | 1 -
 libguile/chooks.c              | 1 -
 libguile/chooks.h              | 2 +-
 libguile/continuations.h       | 1 -
 libguile/debug-malloc.h        | 2 +-
 libguile/debug.h               | 3 +--
 libguile/deprecated.h          | 1 -
 libguile/deprecation.h         | 2 +-
 libguile/dynl.h                | 2 +-
 libguile/dynstack.h            | 2 +-
 libguile/dynwind.h             | 1 -
 libguile/eq.h                  | 4 ++--
 libguile/error.h               | 2 +-
 libguile/eval.c                | 1 -
 libguile/eval.h                | 2 --
 libguile/evalext.h             | 2 +-
 libguile/expand.c              | 1 -
 libguile/expand.h              | 1 -
 libguile/extensions.h          | 2 +-
 libguile/fdes-finalizers.h     | 4 ++--
 libguile/feature.h             | 2 +-
 libguile/filesys.h             | 1 -
 libguile/finalizers.h          | 4 ++--
 libguile/fluids.h              | 1 -
 libguile/foreign-object.h      | 3 +--
 libguile/foreign.h             | 1 -
 libguile/fports.h              | 1 -
 libguile/frames.h              | 2 --
 libguile/gc-inline.h           | 2 --
 libguile/gc.h                  | 1 -
 libguile/gen-scmconfig.c       | 4 ++--
 libguile/generalized-arrays.c  | 1 -
 libguile/generalized-arrays.h  | 1 -
 libguile/generalized-vectors.c | 1 -
 libguile/generalized-vectors.h | 2 +-
 libguile/gettext.h             | 2 +-
 libguile/goops.h               | 1 -
 libguile/gsubr.h               | 1 -
 libguile/guardians.h           | 2 +-
 libguile/hash.h                | 2 +-
 libguile/hashtab.h             | 1 -
 libguile/hooks.h               | 1 -
 libguile/i18n.h                | 2 +-
 libguile/init.h                | 1 -
 libguile/inline.h              | 2 +-
 libguile/instructions.h        | 2 +-
 libguile/intrinsics.h          | 2 +-
 libguile/ioext.h               | 2 +-
 libguile/iselect.h             | 7 +++----
 libguile/keywords.h            | 1 -
 libguile/list.h                | 2 +-
 libguile/load.h                | 2 +-
 libguile/loader.h              | 2 +-
 libguile/macros.h              | 2 +-
 libguile/mallocs.h             | 2 +-
 libguile/memoize.c             | 1 -
 libguile/memoize.h             | 2 +-
 libguile/modules.h             | 2 --
 libguile/net_db.h              | 2 +-
 libguile/numbers.h             | 2 --
 libguile/objprop.h             | 2 +-
 libguile/options.h             | 2 +-
 libguile/pairs.c               | 2 +-
 libguile/pairs.h               | 6 ++----
 libguile/poll.h                | 2 +-
 libguile/ports.h               | 2 --
 libguile/posix-w32.c           | 2 --
 libguile/posix.h               | 1 -
 libguile/print.c               | 2 +-
 libguile/print.h               | 2 --
 libguile/procprop.h            | 2 +-
 libguile/procs.h               | 1 -
 libguile/programs.h            | 1 -
 libguile/promises.c            | 2 --
 libguile/promises.h            | 2 +-
 libguile/r6rs-ports.h          | 4 ++--
 libguile/random.h              | 1 -
 libguile/rdelim.h              | 2 +-
 libguile/read.h                | 2 --
 libguile/regex-posix.h         | 1 -
 libguile/rw.h                  | 2 +-
 libguile/{__scm.h => scm.h}    | 6 +++---
 libguile/scmsigs.h             | 1 -
 libguile/script.h              | 2 +-
 libguile/simpos.h              | 2 +-
 libguile/smob.h                | 1 -
 libguile/snarf.h               | 2 +-
 libguile/socket.h              | 2 +-
 libguile/sort.h                | 2 +-
 libguile/srcprop.h             | 1 -
 libguile/srfi-1.h              | 6 +++---
 libguile/srfi-13.h             | 6 +++---
 libguile/srfi-14.h             | 1 -
 libguile/srfi-4.c              | 1 -
 libguile/srfi-4.h              | 1 -
 libguile/srfi-60.h             | 4 ++--
 libguile/stackchk.h            | 2 --
 libguile/stacks.h              | 1 -
 libguile/stime.h               | 2 +-
 libguile/strings.h             | 1 -
 libguile/strorder.h            | 2 +-
 libguile/strports.h            | 1 -
 libguile/struct.h              | 1 -
 libguile/symbols.h             | 1 -
 libguile/syntax.h              | 2 +-
 libguile/threads.h             | 1 -
 libguile/throw.h               | 2 +-
 libguile/trees.h               | 2 +-
 libguile/unicode.h             | 2 +-
 libguile/uniform.c             | 2 --
 libguile/uniform.h             | 1 -
 libguile/values.h              | 2 +-
 libguile/variable.h            | 1 -
 libguile/vectors.h             | 1 -
 libguile/vm.h                  | 1 -
 libguile/vports.h              | 2 +-
 libguile/weak-list.h           | 1 -
 libguile/weak-set.h            | 2 +-
 libguile/weak-table.h          | 2 +-
 libguile/weak-vector.h         | 2 +-
 138 files changed, 91 insertions(+), 175 deletions(-)

diff --git a/guile-readline/readline.h b/guile-readline/readline.h
index 3c935e2..413b608 100644
--- a/guile-readline/readline.h
+++ b/guile-readline/readline.h
@@ -1,7 +1,7 @@
 #ifndef READLINEH
 #define READLINEH
 
-/*     Copyright (C) 1997, 1999, 2000, 2006 Free Software Foundation, Inc.
+/*     Copyright (C) 1997, 1999, 2000, 2006, 2018 Free Software Foundation, 
Inc.
  * 
  * This program is free software; you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
@@ -20,6 +20,8 @@
  *
  */
 
+#include <libguile.h>
+
 /* SCM_RL_API is a macro prepended to all function and data definitions
    which should be exported or imported in the resulting dynamic link
    library in the Win32 port. */
@@ -32,8 +34,6 @@
 # define SCM_RL_API extern
 #endif
 
-#include "libguile/__scm.h"
-
 SCM_RL_API scm_t_option scm_readline_opts[];
 
 #define SCM_HISTORY_FILE_P     scm_readline_opts[0].val
diff --git a/libguile.h b/libguile.h
index 8fb771f..76b89aa 100644
--- a/libguile.h
+++ b/libguile.h
@@ -29,7 +29,7 @@
 extern "C" {
 #endif
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 #include "libguile/alist.h"
 #include "libguile/array-handle.h"
 #include "libguile/array-map.h"
diff --git a/libguile/Makefile.am b/libguile/Makefile.am
index 53e1e7f..70f3abc 100644
--- a/libguile/Makefile.am
+++ b/libguile/Makefile.am
@@ -577,6 +577,7 @@ pkginclude_HEADERS =
 # These are headers visible as <libguile/mumble.h>.
 modincludedir = $(pkgincludedir)/$(GUILE_EFFECTIVE_VERSION)/libguile
 modinclude_HEADERS =                           \
+       scm.h                                   \
        __scm.h                                 \
        alist.h                                 \
        array-handle.h                          \
diff --git a/libguile/alist.h b/libguile/alist.h
index 31caa70..2c1b422 100644
--- a/libguile/alist.h
+++ b/libguile/alist.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include <libguile/error.h>
 #include "libguile/pairs.h"
 
diff --git a/libguile/array-handle.c b/libguile/array-handle.c
index 545eb37..b49b8e9 100644
--- a/libguile/array-handle.c
+++ b/libguile/array-handle.c
@@ -26,7 +26,6 @@
 
 #include <string.h>
 
-#include "libguile/__scm.h"
 #include "libguile/bitvectors.h"
 #include "libguile/bytevectors.h"
 #include "libguile/list.h"
diff --git a/libguile/array-handle.h b/libguile/array-handle.h
index 1722d16..48dafe0 100644
--- a/libguile/array-handle.h
+++ b/libguile/array-handle.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include "libguile/error.h"
 #include "libguile/inline.h"
 #include "libguile/numbers.h"
diff --git a/libguile/array-map.h b/libguile/array-map.h
index bc19baa..39154b6 100644
--- a/libguile/array-map.h
+++ b/libguile/array-map.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/arrays.c b/libguile/arrays.c
index 3a57447..92f7806 100644
--- a/libguile/arrays.c
+++ b/libguile/arrays.c
@@ -33,7 +33,6 @@
 #include "libguile/gsubr.h"
 #include "libguile/pairs.h"
 #include "libguile/boolean.h"
-#include "libguile/__scm.h"
 #include "libguile/eq.h"
 #include "libguile/chars.h"
 #include "libguile/eval.h"
diff --git a/libguile/arrays.h b/libguile/arrays.h
index 446bd1d..d7e3b28 100644
--- a/libguile/arrays.h
+++ b/libguile/arrays.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include "libguile/gc.h"
 #include "libguile/print.h"
 
diff --git a/libguile/async.h b/libguile/async.h
index 918b0ec..ba9b8df 100644
--- a/libguile/async.h
+++ b/libguile/async.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include "libguile/threads.h"
 
 
diff --git a/libguile/atomic.h b/libguile/atomic.h
index 2d7a5cf..e662737 100644
--- a/libguile/atomic.h
+++ b/libguile/atomic.h
@@ -21,7 +21,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include "libguile/gc.h"
 
 
diff --git a/libguile/backtrace.h b/libguile/backtrace.h
index 8e6e412..2cfc2c7 100644
--- a/libguile/backtrace.h
+++ b/libguile/backtrace.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 SCM_API SCM scm_print_exception (SCM port, SCM frame, SCM key, SCM args);
 
diff --git a/libguile/bitvectors.c b/libguile/bitvectors.c
index 9dbeee8..62f5977 100644
--- a/libguile/bitvectors.c
+++ b/libguile/bitvectors.c
@@ -28,7 +28,6 @@
 #include "libguile/gsubr.h"
 #include "libguile/pairs.h"
 #include "libguile/boolean.h"
-#include "libguile/__scm.h"
 #include "libguile/array-handle.h"
 #include "libguile/bitvectors.h"
 #include "libguile/generalized-vectors.h"
diff --git a/libguile/bitvectors.h b/libguile/bitvectors.h
index 698539a..b790cb2 100644
--- a/libguile/bitvectors.h
+++ b/libguile/bitvectors.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include "libguile/array-handle.h"
 
 
diff --git a/libguile/boolean.c b/libguile/boolean.c
index 4de9d41..57486cb 100644
--- a/libguile/boolean.c
+++ b/libguile/boolean.c
@@ -38,7 +38,7 @@
  * terms of the SCM_MATCHES_BITS_IN_COMMON macro.
  *
  * See the comments preceeding the definitions of SCM_BOOL_F and
- * SCM_MATCHES_BITS_IN_COMMON in __scm.h for more information.
+ * SCM_MATCHES_BITS_IN_COMMON in scm.h for more information.
  */
 verify (SCM_BITS_DIFFER_IN_EXACTLY_ONE_BIT_POSITION            \
         (SCM_BOOL_F_BITS, SCM_BOOL_T_BITS));
diff --git a/libguile/boolean.h b/libguile/boolean.h
index bee0d66..780c761 100644
--- a/libguile/boolean.h
+++ b/libguile/boolean.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
@@ -48,7 +48,7 @@
 
 /*
  * See the comments preceeding the definitions of SCM_BOOL_F and
- * SCM_MATCHES_BITS_IN_COMMON in __scm.h for more information on
+ * SCM_MATCHES_BITS_IN_COMMON in scm.h for more information on
  * how the following macro works.
  */
 #define scm_is_false_or_nil(x)    \
@@ -68,7 +68,7 @@
  * which will be ignored by SCM_MATCHES_BITS_IN_COMMON below.
  *
  * See the comments preceeding the definitions of SCM_BOOL_F and
- * SCM_MATCHES_BITS_IN_COMMON in __scm.h for more information.
+ * SCM_MATCHES_BITS_IN_COMMON in scm.h for more information.
  *
  * If SCM_ENABLE_ELISP is true, then scm_is_bool_or_nil(x)
  * returns 1 if and only if x is one of the following: SCM_BOOL_F,
@@ -112,7 +112,7 @@ SCM_API int scm_to_bool (SCM x);
  * ignored by SCM_MATCHES_BITS_IN_COMMON below.
  *
  * See the comments preceeding the definitions of SCM_BOOL_F and
- * SCM_MATCHES_BITS_IN_COMMON in __scm.h for more information.
+ * SCM_MATCHES_BITS_IN_COMMON in scm.h for more information.
  *
  * scm_is_lisp_false(x) returns 1 if and only if x is one of the
  * following: SCM_BOOL_F, SCM_ELISP_NIL, SCM_EOL or
diff --git a/libguile/bytevectors.h b/libguile/bytevectors.h
index cae0c46..9757170 100644
--- a/libguile/bytevectors.h
+++ b/libguile/bytevectors.h
@@ -21,7 +21,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include <libguile/error.h>
 #include "libguile/gc.h"
 
diff --git a/libguile/cache-internal.h b/libguile/cache-internal.h
index 4c1732f..7bb2e2c 100644
--- a/libguile/cache-internal.h
+++ b/libguile/cache-internal.h
@@ -1,7 +1,7 @@
 #ifndef SCM_CACHE_INTERNAL_H
 #define SCM_CACHE_INTERNAL_H
 
-/* Copyright (C) 2016
+/* Copyright (C) 2016,2018
  * Free Software Foundation, Inc.
  *
  * This library is free software; you can redistribute it and/or
@@ -25,7 +25,6 @@
 
 #include <string.h>
 
-#include "libguile/__scm.h"
 #include "libguile/gc.h"
 #include "libguile/hash.h"
 #include "libguile/threads.h"
diff --git a/libguile/chars.h b/libguile/chars.h
index 7d5a53d..35c9a8e 100644
--- a/libguile/chars.h
+++ b/libguile/chars.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include <libguile/error.h>
 
 
diff --git a/libguile/chooks.c b/libguile/chooks.c
index 458147c..5f6dbcf 100644
--- a/libguile/chooks.c
+++ b/libguile/chooks.c
@@ -25,7 +25,6 @@
 
 #include <stdio.h>
 
-#include "libguile/__scm.h"
 #include "libguile/gc.h"
 #include "libguile/chooks.h"
 
diff --git a/libguile/chooks.h b/libguile/chooks.h
index c6d65ef..5cb21d8 100644
--- a/libguile/chooks.h
+++ b/libguile/chooks.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 /*
  * C level hooks
diff --git a/libguile/continuations.h b/libguile/continuations.h
index 57b2f80..e63e6e2 100644
--- a/libguile/continuations.h
+++ b/libguile/continuations.h
@@ -24,7 +24,6 @@
 
 #include <setjmp.h>
 
-#include "libguile/__scm.h"
 #include "libguile/throw.h"
 
 
diff --git a/libguile/debug-malloc.h b/libguile/debug-malloc.h
index 87030ca..7b5bd6e 100644
--- a/libguile/debug-malloc.h
+++ b/libguile/debug-malloc.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/debug.h b/libguile/debug.h
index 8e015ad..840d0db 100644
--- a/libguile/debug.h
+++ b/libguile/debug.h
@@ -22,9 +22,8 @@
 
 
 
-#include "libguile/__scm.h"
-
 #include "libguile/options.h"
+
 
 
 SCM_API SCM scm_local_eval (SCM exp, SCM env);
diff --git a/libguile/deprecated.h b/libguile/deprecated.h
index de6e071..40d9266 100644
--- a/libguile/deprecated.h
+++ b/libguile/deprecated.h
@@ -19,7 +19,6 @@
  * 02110-1301 USA
  */
 
-#include "libguile/__scm.h"
 #include "libguile/snarf.h"
 
 #if (SCM_ENABLE_DEPRECATED == 1)
diff --git a/libguile/deprecation.h b/libguile/deprecation.h
index a217a75..6404577 100644
--- a/libguile/deprecation.h
+++ b/libguile/deprecation.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/dynl.h b/libguile/dynl.h
index 235aba7..bd11f85 100644
--- a/libguile/dynl.h
+++ b/libguile/dynl.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/dynstack.h b/libguile/dynstack.h
index fa01f86..c0a7331 100644
--- a/libguile/dynstack.h
+++ b/libguile/dynstack.h
@@ -24,7 +24,7 @@
 #include <setjmp.h>
 #include <signal.h>
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/dynwind.h b/libguile/dynwind.h
index d99abf1..fb0a3bc 100644
--- a/libguile/dynwind.h
+++ b/libguile/dynwind.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include "libguile/dynstack.h"
 
 
diff --git a/libguile/eq.h b/libguile/eq.h
index 71c7d29..9143da7 100644
--- a/libguile/eq.h
+++ b/libguile/eq.h
@@ -22,11 +22,11 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
-/* scm_is_eq is defined in __scm.h for some reason. */
+/* scm_is_eq is defined in scm.h for some reason. */
 
 /* An older spelling for scm_is_eq. */
 #define SCM_EQ_P(x,y) (scm_is_eq (x, y))
diff --git a/libguile/error.h b/libguile/error.h
index 30e9066..b8acfc4 100644
--- a/libguile/error.h
+++ b/libguile/error.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 SCM_API SCM scm_system_error_key;
diff --git a/libguile/eval.c b/libguile/eval.c
index c0e9ef4..f794911 100644
--- a/libguile/eval.c
+++ b/libguile/eval.c
@@ -26,7 +26,6 @@
 #include <alloca.h>
 #include <stdarg.h>
 
-#include "libguile/__scm.h"
 #include "libguile/gsubr.h"
 #include "libguile/pairs.h"
 #include "libguile/boolean.h"
diff --git a/libguile/eval.h b/libguile/eval.h
index bec9e4b..32adef2 100644
--- a/libguile/eval.h
+++ b/libguile/eval.h
@@ -22,8 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
-
 #include "libguile/struct.h"
 #include "libguile/memoize.h"
 
diff --git a/libguile/evalext.h b/libguile/evalext.h
index b8d7d34..309d961 100644
--- a/libguile/evalext.h
+++ b/libguile/evalext.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/expand.c b/libguile/expand.c
index a923d6d..a73d74f 100644
--- a/libguile/expand.c
+++ b/libguile/expand.c
@@ -23,7 +23,6 @@
 #  include <config.h>
 #endif
 
-#include "libguile/__scm.h"
 #include "libguile/gsubr.h"
 #include "libguile/pairs.h"
 #include "libguile/boolean.h"
diff --git a/libguile/expand.h b/libguile/expand.h
index f557f60..6b82114 100644
--- a/libguile/expand.h
+++ b/libguile/expand.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include "libguile/struct.h"
 
 
diff --git a/libguile/extensions.h b/libguile/extensions.h
index bfe8703..7c44699 100644
--- a/libguile/extensions.h
+++ b/libguile/extensions.h
@@ -21,7 +21,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 #include "libguile/libpath.h"
 
 
diff --git a/libguile/fdes-finalizers.h b/libguile/fdes-finalizers.h
index cadbb04..ceedbf0 100644
--- a/libguile/fdes-finalizers.h
+++ b/libguile/fdes-finalizers.h
@@ -1,7 +1,7 @@
 #ifndef SCM_FDES_FINALIZERS_H
 #define SCM_FDES_FINALIZERS_H
 
-/* Copyright (C) 2016  Free Software Foundation, Inc.
+/* Copyright (C) 2016, 2018  Free Software Foundation, Inc.
  *
  * This library is free software; you can redistribute it and/or
  * modify it under the terms of the GNU Lesser General Public License
@@ -21,7 +21,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/feature.h b/libguile/feature.h
index ed3d986..2f35826 100644
--- a/libguile/feature.h
+++ b/libguile/feature.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 SCM_API void scm_add_feature (const char* str);
 SCM_API SCM scm_program_arguments (void);
diff --git a/libguile/filesys.h b/libguile/filesys.h
index 1d2b1f6..5417b3d 100644
--- a/libguile/filesys.h
+++ b/libguile/filesys.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include <libguile/error.h>
 
 
diff --git a/libguile/finalizers.h b/libguile/finalizers.h
index 27b2cbf..cb1cf51 100644
--- a/libguile/finalizers.h
+++ b/libguile/finalizers.h
@@ -1,7 +1,7 @@
 #ifndef SCM_FINALIZERS_H
 #define SCM_FINALIZERS_H
 
-/* Copyright (C) 2012, 2013, 2014 Free Software Foundation, Inc.
+/* Copyright (C) 2012, 2013, 2014, 2018 Free Software Foundation, Inc.
  *
  * This library is free software; you can redistribute it and/or
  * modify it under the terms of the GNU Lesser General Public License
@@ -21,7 +21,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/fluids.h b/libguile/fluids.h
index 2af8784..ebe7aee 100644
--- a/libguile/fluids.h
+++ b/libguile/fluids.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include <libguile/error.h>
 #include "libguile/vectors.h"
 
diff --git a/libguile/foreign-object.h b/libguile/foreign-object.h
index 806b7ed..a8cde36 100644
--- a/libguile/foreign-object.h
+++ b/libguile/foreign-object.h
@@ -1,7 +1,7 @@
 #ifndef SCM_FOREIGN_OBJECT_H
 #define SCM_FOREIGN_OBJECT_H
 
-/* Copyright (C) 2014 Free Software Foundation, Inc.
+/* Copyright (C) 2014, 2018 Free Software Foundation, Inc.
  *
  * This library is free software; you can redistribute it and/or
  * modify it under the terms of the GNU Lesser General Public License
@@ -21,7 +21,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include "libguile/print.h"
 
 
diff --git a/libguile/foreign.h b/libguile/foreign.h
index b78f29d..fcfe9e2 100644
--- a/libguile/foreign.h
+++ b/libguile/foreign.h
@@ -19,7 +19,6 @@
  * 02110-1301 USA
  */
 
-#include "libguile/__scm.h"
 #include "libguile/gc.h"
 #include "libguile/snarf.h"
 
diff --git a/libguile/fports.h b/libguile/fports.h
index b26b18a..53d14ad 100644
--- a/libguile/fports.h
+++ b/libguile/fports.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include "libguile/gc.h"
 #include "libguile/ports.h"
 
diff --git a/libguile/frames.h b/libguile/frames.h
index 3aa0e24..c20167e 100644
--- a/libguile/frames.h
+++ b/libguile/frames.h
@@ -19,8 +19,6 @@
 #ifndef _SCM_FRAMES_H_
 #define _SCM_FRAMES_H_
 
-#include <libguile/__scm.h>
-
 #include <libguile/gc.h>
 #include "programs.h"
 
diff --git a/libguile/gc-inline.h b/libguile/gc-inline.h
index 176d9c5..14c1a27 100644
--- a/libguile/gc-inline.h
+++ b/libguile/gc-inline.h
@@ -39,8 +39,6 @@
 
 
 
-#include "libguile/__scm.h"
-
 #include "libguile/gc.h"
 #include "libguile/bdw-gc.h"
 #include "libguile/threads.h"
diff --git a/libguile/gc.h b/libguile/gc.h
index dc559e7..8127acb 100644
--- a/libguile/gc.h
+++ b/libguile/gc.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include "libguile/inline.h"
 #include "libguile/chooks.h"
 
diff --git a/libguile/gen-scmconfig.c b/libguile/gen-scmconfig.c
index 4ac90f0..65e7f6f 100644
--- a/libguile/gen-scmconfig.c
+++ b/libguile/gen-scmconfig.c
@@ -21,7 +21,7 @@
   Description of Guile's public config header mechanics:
   ----------------------------------------------------- 
 
-  Guile has four core headers:
+  Guile has three core headers:
 
     config.h: Guile's private automatically generated configuration
       header -- generated by configure.in and autoheader.  *NOT*
@@ -42,7 +42,7 @@
       gen-scmconfig.h.in), and the information provided in this file,
       gen-scmconfig.c.
 
-    libguile/__scm.h: Guile's public core header.  This file is
+    libguile/scm.h: Guile's public core header.  This file is
       installed and publically visible.  It includes
       libguile/scmconfig.h, the public config header and provides a
       place to make decisions based on the information gathered in
diff --git a/libguile/generalized-arrays.c b/libguile/generalized-arrays.c
index 2e7ee31..94d23c8 100644
--- a/libguile/generalized-arrays.c
+++ b/libguile/generalized-arrays.c
@@ -29,7 +29,6 @@
 
 #include "libguile/gsubr.h"
 #include "libguile/pairs.h"
-#include "libguile/__scm.h"
 #include "libguile/array-handle.h"
 #include "libguile/generalized-arrays.h"
 #include "libguile/list.h"
diff --git a/libguile/generalized-arrays.h b/libguile/generalized-arrays.h
index 060d5f8..7dc6616 100644
--- a/libguile/generalized-arrays.h
+++ b/libguile/generalized-arrays.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include "libguile/array-handle.h"
 #include "libguile/boolean.h"
 #include <libguile/error.h>
diff --git a/libguile/generalized-vectors.c b/libguile/generalized-vectors.c
index a7a0123..76d6f34 100644
--- a/libguile/generalized-vectors.c
+++ b/libguile/generalized-vectors.c
@@ -26,7 +26,6 @@
 
 #include "libguile/gsubr.h"
 #include "libguile/error.h"
-#include "libguile/__scm.h"
 
 #include "libguile/generalized-vectors.h"
 
diff --git a/libguile/generalized-vectors.h b/libguile/generalized-vectors.h
index 133c0c9..77a0428 100644
--- a/libguile/generalized-vectors.h
+++ b/libguile/generalized-vectors.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/snarf.h"
 
 
 
diff --git a/libguile/gettext.h b/libguile/gettext.h
index 82aa54d..96ba43c 100644
--- a/libguile/gettext.h
+++ b/libguile/gettext.h
@@ -20,7 +20,7 @@
  * 02110-1301 USA
  */
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 SCM_API SCM scm_gettext (SCM msgid, SCM domainname, SCM category);
 SCM_API SCM scm_ngettext (SCM msgid, SCM msgid_plural, SCM n, SCM domainname, 
SCM category);
diff --git a/libguile/goops.h b/libguile/goops.h
index 599b46a..34f4f1d 100644
--- a/libguile/goops.h
+++ b/libguile/goops.h
@@ -29,7 +29,6 @@
  * Erick Gallesio <address@hidden>.
  */
 
-#include "libguile/__scm.h"
 #include "libguile/boolean.h"
 #include "libguile/list.h"
 #include "libguile/ports.h"
diff --git a/libguile/gsubr.h b/libguile/gsubr.h
index 4d7b0cf..a11d6fe 100644
--- a/libguile/gsubr.h
+++ b/libguile/gsubr.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include "libguile/snarf.h"
 
 
diff --git a/libguile/guardians.h b/libguile/guardians.h
index 63cac2c..ed7478e 100644
--- a/libguile/guardians.h
+++ b/libguile/guardians.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 SCM_API SCM scm_make_guardian (void);
 
diff --git a/libguile/hash.h b/libguile/hash.h
index a0f308d..8f1ef7e 100644
--- a/libguile/hash.h
+++ b/libguile/hash.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/hashtab.h b/libguile/hashtab.h
index a4c1d0a..8394f66 100644
--- a/libguile/hashtab.h
+++ b/libguile/hashtab.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include "libguile/gc.h"
 
 
diff --git a/libguile/hooks.h b/libguile/hooks.h
index b9c9773..c33efe5 100644
--- a/libguile/hooks.h
+++ b/libguile/hooks.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include <libguile/error.h>
 #include <libguile/smob.h>
 
diff --git a/libguile/i18n.h b/libguile/i18n.h
index ee74bba..31bce30 100644
--- a/libguile/i18n.h
+++ b/libguile/i18n.h
@@ -20,7 +20,7 @@
  * 02110-1301 USA
  */
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 SCM_API SCM scm_global_locale;
 SCM_API SCM scm_make_locale (SCM category_mask, SCM locale_name, SCM 
base_locale);
diff --git a/libguile/init.h b/libguile/init.h
index 39f7021..4d79727 100644
--- a/libguile/init.h
+++ b/libguile/init.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include "libguile/threads.h"
 
 
diff --git a/libguile/inline.h b/libguile/inline.h
index 7bafb06..79cb7b3 100644
--- a/libguile/inline.h
+++ b/libguile/inline.h
@@ -25,7 +25,7 @@
    platforms that do support inline functions, the definitions are still
    compiled into the library, once, in inline.c.  */
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 /* 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
diff --git a/libguile/instructions.h b/libguile/instructions.h
index 8ffd1ff..8d9f16f 100644
--- a/libguile/instructions.h
+++ b/libguile/instructions.h
@@ -19,7 +19,7 @@
 #ifndef _SCM_INSTRUCTIONS_H_
 #define _SCM_INSTRUCTIONS_H_
 
-#include <libguile/__scm.h>
+#include <libguile/scm.h>
 #include <libguile/vm-operations.h>
 
 #ifdef BUILDING_LIBGUILE
diff --git a/libguile/intrinsics.h b/libguile/intrinsics.h
index 6a00c8f..c587655 100644
--- a/libguile/intrinsics.h
+++ b/libguile/intrinsics.h
@@ -19,7 +19,7 @@
 #ifndef _SCM_VM_INTRINSICS_H_
 #define _SCM_VM_INTRINSICS_H_
 
-#include <libguile/__scm.h>
+#include <libguile/scm.h>
 
 #ifdef BUILDING_LIBGUILE
 
diff --git a/libguile/ioext.h b/libguile/ioext.h
index b64bc43..59f6ac9 100644
--- a/libguile/ioext.h
+++ b/libguile/ioext.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/iselect.h b/libguile/iselect.h
index 7b98242..eea6f0d 100644
--- a/libguile/iselect.h
+++ b/libguile/iselect.h
@@ -22,12 +22,11 @@
 
 
 
-#include "libguile/__scm.h"
+#include <sys/types.h> /* Needed for FD_SET on some systems.  */
+#include <sys/select.h>
 
-/* Needed for FD_SET on some systems.  */
-#include <sys/types.h>
+#include "libguile/scm.h"
 
-#include <sys/select.h>
 
 SCM_API int scm_std_select (int fds,
                            fd_set *rfds,
diff --git a/libguile/keywords.h b/libguile/keywords.h
index a533506..fb17b57 100644
--- a/libguile/keywords.h
+++ b/libguile/keywords.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include <libguile/error.h>
 #include <libguile/snarf.h>
 
diff --git a/libguile/list.h b/libguile/list.h
index 57d93bb..5a265b8 100644
--- a/libguile/list.h
+++ b/libguile/list.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/error.h"
 
 
 
diff --git a/libguile/load.h b/libguile/load.h
index 5753ba6..af74931 100644
--- a/libguile/load.h
+++ b/libguile/load.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 SCM_API SCM scm_parse_path (SCM path, SCM tail);
diff --git a/libguile/loader.h b/libguile/loader.h
index 60b2881..578ff2c 100644
--- a/libguile/loader.h
+++ b/libguile/loader.h
@@ -19,7 +19,7 @@
 #ifndef _SCM_LOADER_H_
 #define _SCM_LOADER_H_
 
-#include <libguile/__scm.h>
+#include <libguile/scm.h>
 
 #ifdef BUILDING_LIBGUILE
 
diff --git a/libguile/macros.h b/libguile/macros.h
index 23dbc8a..9aa81d9 100644
--- a/libguile/macros.h
+++ b/libguile/macros.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/mallocs.h b/libguile/mallocs.h
index 016272b..3524051 100644
--- a/libguile/mallocs.h
+++ b/libguile/mallocs.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 SCM_API scm_t_bits scm_tc16_malloc;
diff --git a/libguile/memoize.c b/libguile/memoize.c
index cadaa2d..7edde18 100644
--- a/libguile/memoize.c
+++ b/libguile/memoize.c
@@ -27,7 +27,6 @@
 #include <string.h>
 #include <stdio.h>
 
-#include "libguile/__scm.h"
 #include "libguile/gsubr.h"
 #include "libguile/pairs.h"
 #include "libguile/boolean.h"
diff --git a/libguile/memoize.h b/libguile/memoize.h
index ec6efb3..3280f69 100644
--- a/libguile/memoize.h
+++ b/libguile/memoize.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/modules.h b/libguile/modules.h
index 66adff5..893e4c5 100644
--- a/libguile/modules.h
+++ b/libguile/modules.h
@@ -22,8 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
-
 #include "libguile/gc.h"
 
 
diff --git a/libguile/net_db.h b/libguile/net_db.h
index 737d943..4664565 100644
--- a/libguile/net_db.h
+++ b/libguile/net_db.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/numbers.h b/libguile/numbers.h
index 1001194..125b9b7 100644
--- a/libguile/numbers.h
+++ b/libguile/numbers.h
@@ -24,9 +24,7 @@
 
 #include <gmp.h>
 
-#include "libguile/__scm.h"
 #include "libguile/error.h"
-
 #include "libguile/gc.h"
 #include "libguile/print.h"
 
diff --git a/libguile/objprop.h b/libguile/objprop.h
index f6aa010..e8a6ebe 100644
--- a/libguile/objprop.h
+++ b/libguile/objprop.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/options.h b/libguile/options.h
index ccfcff4..4fc9c4c 100644
--- a/libguile/options.h
+++ b/libguile/options.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/pairs.c b/libguile/pairs.c
index 57c2099..648b04a 100644
--- a/libguile/pairs.c
+++ b/libguile/pairs.c
@@ -40,7 +40,7 @@
  * which is defined in terms of the SCM_MATCHES_BITS_IN_COMMON macro.
  *
  * See the comments preceeding the definitions of SCM_BOOL_F and
- * SCM_MATCHES_BITS_IN_COMMON in __scm.h for more information.
+ * SCM_MATCHES_BITS_IN_COMMON in scm.h for more information.
  */
 verify (SCM_BITS_DIFFER_IN_EXACTLY_ONE_BIT_POSITION            \
         (SCM_ELISP_NIL_BITS, SCM_EOL_BITS));
diff --git a/libguile/pairs.h b/libguile/pairs.h
index d4a75c0..05e5ff7 100644
--- a/libguile/pairs.h
+++ b/libguile/pairs.h
@@ -22,8 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
-
 #include "libguile/error.h"
 #include "libguile/gc.h"
 #include "libguile/inline.h"
@@ -46,8 +44,8 @@
 
 /*
  * See the comments preceeding the definitions of SCM_BOOL_F and
- * SCM_MATCHES_BITS_IN_COMMON in __scm.h for more information on
- * how the following macro works.
+ * SCM_MATCHES_BITS_IN_COMMON in scm.h for more information on how the
+ * following macro works.
  */
 #define scm_is_null_or_nil(x)  \
   (SCM_MATCHES_BITS_IN_COMMON ((x), SCM_ELISP_NIL, SCM_EOL))
diff --git a/libguile/poll.h b/libguile/poll.h
index d1aa7ac..c053f45 100644
--- a/libguile/poll.h
+++ b/libguile/poll.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/ports.h b/libguile/ports.h
index f40448a..0fc2fab 100644
--- a/libguile/ports.h
+++ b/libguile/ports.h
@@ -22,8 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
-
 #include "libguile/gc.h"
 #include "libguile/error.h"
 #include "libguile/print.h"
diff --git a/libguile/posix-w32.c b/libguile/posix-w32.c
index 142b576..6f7f019 100644
--- a/libguile/posix-w32.c
+++ b/libguile/posix-w32.c
@@ -20,8 +20,6 @@
 # include <config.h>
 #endif
 
-#include "libguile/__scm.h"
-
 # define WIN32_LEAN_AND_MEAN
 #include <windows.h>
 #include <c-strcase.h>
diff --git a/libguile/posix.h b/libguile/posix.h
index 9be90b8..5d47651 100644
--- a/libguile/posix.h
+++ b/libguile/posix.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include "libguile/threads.h"
 
 
diff --git a/libguile/print.c b/libguile/print.c
index 404ab2e..41459a4 100644
--- a/libguile/print.c
+++ b/libguile/print.c
@@ -84,7 +84,7 @@ static void write_character (scm_t_wchar, SCM);
  * This table must agree with the declarations in scm.h: {Immediate Symbols}.
  */
 
-/* This table must agree with the list of flags in __scm.h.  */
+/* This table must agree with the list of flags in scm.h.  */
 static const char *iflagnames[] =
 {
   "#f",
diff --git a/libguile/print.h b/libguile/print.h
index 4719baa..ea3e750 100644
--- a/libguile/print.h
+++ b/libguile/print.h
@@ -22,8 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
-
 #include "libguile/chars.h" 
 #include <libguile/error.h>
 #include <libguile/gc.h>
diff --git a/libguile/procprop.h b/libguile/procprop.h
index d174b77..3782e64 100644
--- a/libguile/procprop.h
+++ b/libguile/procprop.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/procs.h b/libguile/procs.h
index 9e772b3..a6c05d4 100644
--- a/libguile/procs.h
+++ b/libguile/procs.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include "libguile/boolean.h"
 #include <libguile/error.h>
 
diff --git a/libguile/programs.h b/libguile/programs.h
index 95a1eb0..1c082b4 100644
--- a/libguile/programs.h
+++ b/libguile/programs.h
@@ -19,7 +19,6 @@
 #ifndef _SCM_PROGRAMS_H_
 #define _SCM_PROGRAMS_H_
 
-#include <libguile/__scm.h>
 #include <libguile/gc.h>
 
 /*
diff --git a/libguile/promises.c b/libguile/promises.c
index ac7876b..c94e454 100644
--- a/libguile/promises.c
+++ b/libguile/promises.c
@@ -25,9 +25,7 @@
 
 #include <alloca.h>
 
-#include "libguile/__scm.h"
 #include "libguile/gsubr.h"
-
 #include "libguile/alist.h"
 #include "libguile/async.h"
 #include "libguile/continuations.h"
diff --git a/libguile/promises.h b/libguile/promises.h
index fe17951..d8aa8d4 100644
--- a/libguile/promises.h
+++ b/libguile/promises.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/smob.h"
 
 
 
diff --git a/libguile/r6rs-ports.h b/libguile/r6rs-ports.h
index a2c63c7..99acd9f 100644
--- a/libguile/r6rs-ports.h
+++ b/libguile/r6rs-ports.h
@@ -1,7 +1,7 @@
 #ifndef SCM_R6RS_PORTS_H
 #define SCM_R6RS_PORTS_H
 
-/* Copyright (C) 2009, 2010, 2011, 2013 Free Software Foundation, Inc.
+/* Copyright (C) 2009, 2010, 2011, 2013, 2018 Free Software Foundation, Inc.
  *
  * This library is free software; you can redistribute it and/or
  * modify it under the terms of the GNU Lesser General Public License
@@ -21,7 +21,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 /* R6RS I/O Ports.  */
 
diff --git a/libguile/random.h b/libguile/random.h
index a864bb3..d422220 100644
--- a/libguile/random.h
+++ b/libguile/random.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include <libguile/error.h>
 
 
diff --git a/libguile/rdelim.h b/libguile/rdelim.h
index cec8ddd..e20e027 100644
--- a/libguile/rdelim.h
+++ b/libguile/rdelim.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 SCM_API SCM scm_read_delimited_x (SCM delims, SCM buf, SCM gobble, SCM port,
                                  SCM offset, SCM length);
diff --git a/libguile/read.h b/libguile/read.h
index 3b31100..1118a0a 100644
--- a/libguile/read.h
+++ b/libguile/read.h
@@ -22,8 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
-
 #include "libguile/options.h"
 
 
diff --git a/libguile/regex-posix.h b/libguile/regex-posix.h
index c2bc923..8078d78 100644
--- a/libguile/regex-posix.h
+++ b/libguile/regex-posix.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include <libguile/error.h>
 
 SCM_API scm_t_bits scm_tc16_regex;
diff --git a/libguile/rw.h b/libguile/rw.h
index cbe8c7f..153a091 100644
--- a/libguile/rw.h
+++ b/libguile/rw.h
@@ -21,7 +21,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 SCM_API SCM scm_read_string_x_partial (SCM str, SCM port_or_fdes, SCM start,
                                       SCM end);
diff --git a/libguile/__scm.h b/libguile/scm.h
similarity index 99%
rename from libguile/__scm.h
rename to libguile/scm.h
index 52d251c..389e947 100644
--- a/libguile/__scm.h
+++ b/libguile/scm.h
@@ -1,5 +1,5 @@
-#ifndef SCM___SCM_H
-#define SCM___SCM_H
+#ifndef SCM_SCM_H
+#define SCM_SCM_H
 
 /* Copyright (C) 1995-2004,2006-2015,2017-2018
  *   Free Software Foundation, Inc.
@@ -848,4 +848,4 @@ typedef long SCM_STACKITEM;
 #define SCM_STACK_PTR(ptr) ((SCM_STACKITEM *) (void *) (ptr))
 
 
-#endif  /* SCM___SCM_H */
+#endif  /* SCM_SCM_H */
diff --git a/libguile/scmsigs.h b/libguile/scmsigs.h
index 4dbdc61..643357f 100644
--- a/libguile/scmsigs.h
+++ b/libguile/scmsigs.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include "libguile/threads.h"
 
 
diff --git a/libguile/script.h b/libguile/script.h
index 6d1dc3a..bb781b5 100644
--- a/libguile/script.h
+++ b/libguile/script.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 SCM_API char *scm_find_executable (const char *name);
diff --git a/libguile/simpos.h b/libguile/simpos.h
index 8ab8423..bf0125d 100644
--- a/libguile/simpos.h
+++ b/libguile/simpos.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/smob.h b/libguile/smob.h
index d14fec5..af0f6cb 100644
--- a/libguile/smob.h
+++ b/libguile/smob.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include <libguile/error.h>
 #include <libguile/gc.h>
 #include "libguile/inline.h"
diff --git a/libguile/snarf.h b/libguile/snarf.h
index f8f870b..b00bfc3 100644
--- a/libguile/snarf.h
+++ b/libguile/snarf.h
@@ -23,7 +23,7 @@
 
 
 
-#include <libguile/__scm.h>
+#include <libguile/scm.h>
 
 
 /* Macros for snarfing initialization actions from C source. */
diff --git a/libguile/socket.h b/libguile/socket.h
index 7cfff6e..ae39b55 100644
--- a/libguile/socket.h
+++ b/libguile/socket.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/sort.h b/libguile/sort.h
index f9a1382..907ccc2 100644
--- a/libguile/sort.h
+++ b/libguile/sort.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/srcprop.h b/libguile/srcprop.h
index 124594b..67b264d 100644
--- a/libguile/srcprop.h
+++ b/libguile/srcprop.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include "libguile/boolean.h"
 
 
diff --git a/libguile/srfi-1.h b/libguile/srfi-1.h
index 47607bc..e30bb5b 100644
--- a/libguile/srfi-1.h
+++ b/libguile/srfi-1.h
@@ -1,6 +1,6 @@
 /* srfi-1.h --- SRFI-1 procedures for Guile
- *
- *     Copyright (C) 2002, 2003, 2005, 2006, 2010, 2011 Free Software 
Foundation, Inc.
+ * Copyright (C) 2002-2003,2005-2006,2010-2011,2018
+ *   Free Software Foundation, Inc.
  *
  * This library is free software; you can redistribute it and/or
  * modify it under the terms of the GNU Lesser General Public License
@@ -22,7 +22,7 @@
 #ifndef SCM_SRFI_1_H
 #define SCM_SRFI_1_H
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 SCM_INTERNAL SCM scm_srfi1_append_reverse (SCM revhead, SCM tail);
 SCM_INTERNAL SCM scm_srfi1_append_reverse_x (SCM revhead, SCM tail);
diff --git a/libguile/srfi-13.h b/libguile/srfi-13.h
index 325e222..643fa6d 100644
--- a/libguile/srfi-13.h
+++ b/libguile/srfi-13.h
@@ -2,8 +2,8 @@
 #define SCM_SRFI_13_H
 
 /* srfi-13.c --- SRFI-13 procedures for Guile
- *
- *     Copyright (C) 2001, 2004, 2006, 2008, 2010 Free Software Foundation, 
Inc.
+ * Copyright (C) 2001,2004,2006,2008,2010,2018
+ *   Free Software Foundation, Inc.
  *
  * This library is free software; you can redistribute it and/or
  * modify it under the terms of the GNU Lesser General Public License
@@ -22,7 +22,7 @@
  */
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 SCM_API SCM scm_string_null_p (SCM s);
 SCM_API SCM scm_string_any (SCM pred, SCM s, SCM start, SCM end);
diff --git a/libguile/srfi-14.h b/libguile/srfi-14.h
index f3754c5..3cc1ff6 100644
--- a/libguile/srfi-14.h
+++ b/libguile/srfi-14.h
@@ -23,7 +23,6 @@
  */
 
 
-#include "libguile/__scm.h"
 #include "libguile/chars.h"
 
 typedef struct
diff --git a/libguile/srfi-4.c b/libguile/srfi-4.c
index 9bcdf54..ce81b86 100644
--- a/libguile/srfi-4.c
+++ b/libguile/srfi-4.c
@@ -26,7 +26,6 @@
 
 #include "libguile/gsubr.h"
 #include "libguile/boolean.h"
-#include "libguile/__scm.h"
 #include "libguile/bdw-gc.h"
 #include "libguile/srfi-4.h"
 #include "libguile/bytevectors.h"
diff --git a/libguile/srfi-4.h b/libguile/srfi-4.h
index 9af5f3e..c917c90 100644
--- a/libguile/srfi-4.h
+++ b/libguile/srfi-4.h
@@ -21,7 +21,6 @@
  */
 
 
-#include "libguile/__scm.h"
 #include "libguile/array-handle.h"
 
 SCM_API SCM scm_make_srfi_4_vector (SCM type, SCM len, SCM fill);
diff --git a/libguile/srfi-60.h b/libguile/srfi-60.h
index 013820f..bada9ce 100644
--- a/libguile/srfi-60.h
+++ b/libguile/srfi-60.h
@@ -1,6 +1,6 @@
 /* srfi-60.h --- SRFI-60 procedures for Guile
  *
- *     Copyright (C) 2005, 2006, 2010 Free Software Foundation, Inc.
+ *     Copyright (C) 2005, 2006, 2010, 2018 Free Software Foundation, Inc.
  *
  * This library is free software; you can redistribute it and/or
  * modify it under the terms of the GNU Lesser General Public License
@@ -22,7 +22,7 @@
 #ifndef SCM_SRFI_60_H
 #define SCM_SRFI_60_H
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 SCM_INTERNAL SCM scm_srfi60_log2_binary_factors (SCM n);
 SCM_INTERNAL SCM scm_srfi60_copy_bit (SCM index, SCM n, SCM bit);
diff --git a/libguile/stackchk.h b/libguile/stackchk.h
index a9b2f1c..8a3dd55 100644
--- a/libguile/stackchk.h
+++ b/libguile/stackchk.h
@@ -22,8 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
-
 #include "libguile/continuations.h"
 #include "libguile/debug.h"
 
diff --git a/libguile/stacks.h b/libguile/stacks.h
index 79f950e..d9c3a72 100644
--- a/libguile/stacks.h
+++ b/libguile/stacks.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include <libguile/error.h>
 #include "libguile/frames.h"
 
diff --git a/libguile/stime.h b/libguile/stime.h
index 34cbb13..13c2a06 100644
--- a/libguile/stime.h
+++ b/libguile/stime.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/strings.h b/libguile/strings.h
index 7cf8776..557df96 100644
--- a/libguile/strings.h
+++ b/libguile/strings.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include <libguile/gc.h>
 #include <libguile/error.h>
 #include "libguile/inline.h"
diff --git a/libguile/strorder.h b/libguile/strorder.h
index 0626fbe..76a8ca5 100644
--- a/libguile/strorder.h
+++ b/libguile/strorder.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/strports.h b/libguile/strports.h
index 58983a2..27fea5e 100644
--- a/libguile/strports.h
+++ b/libguile/strports.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include <libguile/error.h>
 #include <libguile/gc.h>
 #include <libguile/ports.h>
diff --git a/libguile/struct.h b/libguile/struct.h
index d39c90c..37d7e01 100644
--- a/libguile/struct.h
+++ b/libguile/struct.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include "libguile/boolean.h"
 #include <libguile/error.h>
 #include <libguile/gc.h>
diff --git a/libguile/symbols.h b/libguile/symbols.h
index d6e5f96..7917f53 100644
--- a/libguile/symbols.h
+++ b/libguile/symbols.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include <libguile/error.h>
 #include <libguile/gc.h>
 #include <libguile/snarf.h>
diff --git a/libguile/syntax.h b/libguile/syntax.h
index 50bb475..5d832d4 100644
--- a/libguile/syntax.h
+++ b/libguile/syntax.h
@@ -19,7 +19,7 @@
  * 02110-1301 USA
  */
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 SCM_INTERNAL SCM scm_syntax_p (SCM obj);
 SCM_INTERNAL SCM scm_make_syntax (SCM exp, SCM wrap, SCM module);
diff --git a/libguile/threads.h b/libguile/threads.h
index fb8f3db..2afb9e7 100644
--- a/libguile/threads.h
+++ b/libguile/threads.h
@@ -24,7 +24,6 @@
 
 #include <setjmp.h>
 
-#include "libguile/__scm.h"
 #include "libguile/procs.h"
 #include "libguile/throw.h"
 #include "libguile/dynstack.h"
diff --git a/libguile/throw.h b/libguile/throw.h
index 451309f..a3c4728 100644
--- a/libguile/throw.h
+++ b/libguile/throw.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/trees.h b/libguile/trees.h
index e7aab33..be35101 100644
--- a/libguile/trees.h
+++ b/libguile/trees.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/unicode.h b/libguile/unicode.h
index 1e376c5..9b1ee71 100644
--- a/libguile/unicode.h
+++ b/libguile/unicode.h
@@ -21,7 +21,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 SCM_INTERNAL SCM scm_formal_name_to_char (SCM);
 SCM_INTERNAL SCM scm_char_to_formal_name (SCM);
diff --git a/libguile/uniform.c b/libguile/uniform.c
index 16bba35..2110d6a 100644
--- a/libguile/uniform.c
+++ b/libguile/uniform.c
@@ -23,8 +23,6 @@
 #  include <config.h>
 #endif
 
-#include "libguile/__scm.h"
-
 #include "libguile/uniform.h"
 
 
diff --git a/libguile/uniform.h b/libguile/uniform.h
index 4017e73..4129935 100644
--- a/libguile/uniform.h
+++ b/libguile/uniform.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include "libguile/array-handle.h"
 
 
diff --git a/libguile/values.h b/libguile/values.h
index c3cf249..7f143ad 100644
--- a/libguile/values.h
+++ b/libguile/values.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/struct.h"
 
 SCM_API SCM scm_values_vtable;
 
diff --git a/libguile/variable.h b/libguile/variable.h
index 236eeae..ef5092f 100644
--- a/libguile/variable.h
+++ b/libguile/variable.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include <libguile/error.h>
 #include <libguile/gc.h>
 #include <libguile/snarf.h>
diff --git a/libguile/vectors.h b/libguile/vectors.h
index 9e84616..a9ba840 100644
--- a/libguile/vectors.h
+++ b/libguile/vectors.h
@@ -22,7 +22,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include "libguile/array-handle.h"
 #include <libguile/error.h>
 #include "libguile/gc.h"
diff --git a/libguile/vm.h b/libguile/vm.h
index 6d05ca8..1cd0a38 100644
--- a/libguile/vm.h
+++ b/libguile/vm.h
@@ -19,7 +19,6 @@
 #ifndef _SCM_VM_H_
 #define _SCM_VM_H_
 
-#include <libguile/__scm.h>
 #include <libguile/gc.h>
 #include <libguile/frames.h>
 #include <libguile/programs.h>
diff --git a/libguile/vports.h b/libguile/vports.h
index e641593..8e8e16f 100644
--- a/libguile/vports.h
+++ b/libguile/vports.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/weak-list.h b/libguile/weak-list.h
index c6be669..b15ea4b 100644
--- a/libguile/weak-list.h
+++ b/libguile/weak-list.h
@@ -21,7 +21,6 @@
 
 
 
-#include "libguile/__scm.h"
 #include "libguile/pairs.h"
 #include "libguile/weak-vector.h"
 
diff --git a/libguile/weak-set.h b/libguile/weak-set.h
index 7c687cc..4101683 100644
--- a/libguile/weak-set.h
+++ b/libguile/weak-set.h
@@ -21,7 +21,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/weak-table.h b/libguile/weak-table.h
index b9e1f9b..634ee78 100644
--- a/libguile/weak-table.h
+++ b/libguile/weak-table.h
@@ -21,7 +21,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 
diff --git a/libguile/weak-vector.h b/libguile/weak-vector.h
index 06f373e..5ed41c0 100644
--- a/libguile/weak-vector.h
+++ b/libguile/weak-vector.h
@@ -22,7 +22,7 @@
 
 
 
-#include "libguile/__scm.h"
+#include "libguile/scm.h"
 
 
 /* Weak vectors.  */



reply via email to

[Prev in Thread] Current Thread [Next in Thread]