#define SCM_CODE(x) SCM_CAR(SCM_CLOSCAR (x))
#define SCM_MAKINUM(x) (((x)<<2)+2L)
-#ifdef __STDC__ /* Forward decls for prototypes */
+#ifdef __STDC__ /* Forward decls for prototypes */
struct value;
#endif
-extern int scm_value_print PARAMS ((struct value *, GDB_FILE*,
+extern int scm_value_print PARAMS ((struct value *, GDB_FILE *,
int, enum val_prettyprint));
-extern int scm_val_print PARAMS ((struct type*, char*, int, CORE_ADDR, GDB_FILE*,
- int, int, int, enum val_prettyprint));
+extern int scm_val_print PARAMS ((struct type *, char *, int, CORE_ADDR, GDB_FILE *,
+ int, int, int, enum val_prettyprint));
extern LONGEST scm_get_field PARAMS ((LONGEST, int));
extern void scm_scmval_print PARAMS ((LONGEST, GDB_FILE *,
- int, int, int, enum val_prettyprint));
+ int, int, int, enum val_prettyprint));
-extern int is_scmvalue_type PARAMS ((struct type*));
+extern int is_scmvalue_type PARAMS ((struct type *));
-extern void scm_printchar PARAMS ((int, GDB_FILE*));
+extern void scm_printchar PARAMS ((int, GDB_FILE *));
-extern struct value * scm_evaluate_string PARAMS ((char*, int));
+extern struct value *scm_evaluate_string PARAMS ((char *, int));
extern struct type *builtin_type_scm;