* configure.in: Call AM_PROG_CC_STDC, to see what flags we should

[bpt/guile.git] / libguile / read.h

diff --git a/libguile/read.h b/libguile/read.h
index 8eef1ed..f5e21ca 100644 (file)
--- a/libguile/read.h
+++ b/libguile/read.h
@@ -16,7 +16,8 @@
  * 
  * You should have received a copy of the GNU General Public License
  * along with this software; see the file COPYING.  If not, write to
- * the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
+ * the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
+ * Boston, MA 02111-1307 USA
  *
  * As a special exception, the Free Software Foundation gives permission
  * for additional uses of the text contained in its release of GUILE.
@@ -40,8 +41,7 @@
  *
  * If you write modifications of your own for GUILE, it is your choice
  * whether to permit this exception to apply to your modifications.
- * If you do not wish that, delete this exception notice.  
- */
+ * If you do not wish that, delete this exception notice.  */
 \f
 
 #include "libguile/__scm.h"
@@ -71,19 +71,22 @@ extern scm_option scm_read_opts[];
 
 #define SCM_COPY_SOURCE_P      scm_read_opts[0].val
 #define SCM_RECORD_POSITIONS_P scm_read_opts[1].val
-#define SCM_N_READ_OPTIONS 2
+#define SCM_CASE_INSENSITIVE_P scm_read_opts[2].val
+#define SCM_KEYWORD_STYLE      scm_read_opts[3].val
+#define SCM_N_READ_OPTIONS 4
 
 \f
 
 extern SCM scm_read_options SCM_P ((SCM setting));
-extern SCM scm_read SCM_P ((SCM port, SCM casep, SCM sharp));
+extern SCM scm_read SCM_P ((SCM port));
 extern char * scm_grow_tok_buf SCM_P ((SCM * tok_buf));
 extern int scm_flush_ws SCM_P ((SCM port, char *eoferr));
 extern int scm_casei_streq SCM_P ((char * s1, char * s2));
-extern SCM scm_lreadr SCM_P ((SCM * tok_buf, SCM port, int case_i, SCM sharp, SCM *copy));
-extern scm_sizet scm_read_token SCM_P ((int ic, SCM * tok_buf, SCM port, int case_i, int weird));
-extern SCM scm_lreadparen SCM_P ((SCM * tok_buf, SCM port, char *name, int case_i, SCM sharp, SCM *copy));
-extern SCM scm_lreadrecparen SCM_P ((SCM * tok_buf, SCM port, char *name, int case_i, SCM sharp, SCM *copy));
+extern SCM scm_lreadr SCM_P ((SCM * tok_buf, SCM port, SCM *copy));
+extern scm_sizet scm_read_token SCM_P ((int ic, SCM * tok_buf, SCM port, int weird));
+extern SCM scm_lreadparen SCM_P ((SCM * tok_buf, SCM port, char *name, SCM *copy));
+extern SCM scm_lreadrecparen SCM_P ((SCM * tok_buf, SCM port, char *name, SCM *copy));
+extern SCM scm_read_hash_extend SCM_P ((SCM chr, SCM proc));
 extern void scm_init_read SCM_P ((void));
 
 #endif  /* READH */