summaryrefslogtreecommitdiff
path: root/libguile/gdbint.c
diff options
context:
space:
mode:
authorGreg J. Badros <gjb@cs.washington.edu>1999-12-12 20:35:02 +0000
committerGreg J. Badros <gjb@cs.washington.edu>1999-12-12 20:35:02 +0000
commit6e8d25a6954b00e1ff40976d95c8289cfa9fcca4 (patch)
tree524a6cdf3bb04e0ed9cb97b5d66777972e336c07 /libguile/gdbint.c
parent1006486ec27336ea25ece6e5d97a2dbefbfe79e3 (diff)
downloadguile-6e8d25a6954b00e1ff40976d95c8289cfa9fcca4.tar.gz
* *.c: Finish replacing K&R style prototypes with ANSI C
prototypes. * eval.c: Make scm_m_mody's 3rd argument be a const char *, not a char *. ANSI prototypes caught this. * strorder.c: Use GUILE_PROC1 for the couple SCM_PROC1 expansions that I missed. * scm_validate.h: Use SCM_BOOLP for validating bools. Do not expand macros if SCM_DOCSTRING_SNARF.
Diffstat (limited to 'libguile/gdbint.c')
-rw-r--r--libguile/gdbint.c16
1 files changed, 5 insertions, 11 deletions
diff --git a/libguile/gdbint.c b/libguile/gdbint.c
index 647e38504..c219dbd32 100644
--- a/libguile/gdbint.c
+++ b/libguile/gdbint.c
@@ -163,8 +163,7 @@ remark_port (SCM port)
int
-gdb_maybe_valid_type_p (value)
- SCM value;
+gdb_maybe_valid_type_p (SCM value)
{
if (SCM_IMP (value) || scm_cellp (value))
return scm_tag (value) != SCM_MAKINUM (-1);
@@ -173,8 +172,7 @@ gdb_maybe_valid_type_p (value)
int
-gdb_read (str)
- char *str;
+gdb_read (char *str)
{
SCM ans;
int status = 0;
@@ -239,8 +237,7 @@ exit:
int
-gdb_eval (exp)
- SCM exp;
+gdb_eval (SCM exp)
{
RESET_STRING;
if (SCM_IMP (exp))
@@ -264,8 +261,7 @@ gdb_eval (exp)
int
-gdb_print (obj)
- SCM obj;
+gdb_print (SCM obj)
{
RESET_STRING;
SCM_BEGIN_FOREIGN_BLOCK;
@@ -286,9 +282,7 @@ gdb_print (obj)
int
-gdb_binding (name, value)
- SCM name;
- SCM value;
+gdb_binding (SCM name, SCM value)
{
RESET_STRING;
if (SCM_GC_P)