summaryrefslogtreecommitdiff
path: root/libguile/debug.h
diff options
context:
space:
mode:
authorMarius Vollmer <mvo@zagadka.de>2001-06-14 19:50:43 +0000
committerMarius Vollmer <mvo@zagadka.de>2001-06-14 19:50:43 +0000
commit92c2555f6972b5fbc2236fe486e9432040b43812 (patch)
treee439c8a06c62d74e4ef377a3fbe94783f2943a90 /libguile/debug.h
parent51fa276692198eb140365f60e516fbc8ff547f10 (diff)
downloadguile-92c2555f6972b5fbc2236fe486e9432040b43812.tar.gz
replace "scm_*_t" with "scm_t_*".
Diffstat (limited to 'libguile/debug.h')
-rw-r--r--libguile/debug.h28
1 files changed, 14 insertions, 14 deletions
diff --git a/libguile/debug.h b/libguile/debug.h
index 6a49a3aed..10a0cf69c 100644
--- a/libguile/debug.h
+++ b/libguile/debug.h
@@ -69,7 +69,7 @@
/* scm_debug_opts is defined in eval.c.
*/
-extern scm_option_t scm_debug_opts[];
+extern scm_t_option scm_debug_opts[];
#define SCM_CHEAPTRAPS_P scm_debug_opts[0].val
#define SCM_BREAKPOINTS_P scm_debug_opts[1].val
@@ -109,30 +109,30 @@ do {\
/* {Evaluator}
*/
-typedef union scm_debug_info_t
+typedef union scm_t_debug_info
{
struct { SCM exp, env; } e;
struct { SCM proc, args; } a;
SCM id;
-} scm_debug_info_t;
+} scm_t_debug_info;
extern long scm_debug_eframe_size;
-typedef struct scm_debug_frame_t
+typedef struct scm_t_debug_frame
{
- struct scm_debug_frame_t *prev;
+ struct scm_t_debug_frame *prev;
long status;
- scm_debug_info_t *vect;
- scm_debug_info_t *info;
-} scm_debug_frame_t;
+ scm_t_debug_info *vect;
+ scm_t_debug_info *info;
+} scm_t_debug_frame;
#if (SCM_DEBUG_DEPRECATED == 0)
-# define scm_debug_info scm_debug_info_t
-# define scm_debug_frame scm_debug_frame_t
+# define scm_debug_info scm_t_debug_info
+# define scm_debug_frame scm_t_debug_frame
#endif
#ifndef USE_THREADS
-extern scm_debug_frame_t *scm_last_debug_frame;
+extern scm_t_debug_frame *scm_last_debug_frame;
#endif
#define SCM_EVALFRAME (0L << 11)
@@ -170,7 +170,7 @@ extern scm_debug_frame_t *scm_last_debug_frame;
/* {Debug Objects}
*/
-extern scm_bits_t scm_tc16_debugobj;
+extern scm_t_bits scm_tc16_debugobj;
#define SCM_DEBUGOBJP(x) SCM_TYP16_PREDICATE (scm_tc16_debugobj, x)
#define SCM_DEBUGOBJ_FRAME(x) SCM_CELL_WORD_1 (x)
@@ -179,7 +179,7 @@ extern scm_bits_t scm_tc16_debugobj;
/* {Memoized Source}
*/
-extern scm_bits_t scm_tc16_memoized;
+extern scm_t_bits scm_tc16_memoized;
#define SCM_MEMOIZEDP(x) SCM_TYP16_PREDICATE (scm_tc16_memoized, x)
#define SCM_MEMOIZED_EXP(x) SCM_CAR (SCM_CELL_OBJECT_1 (x))
@@ -203,7 +203,7 @@ extern SCM scm_with_traps (SCM thunk);
extern SCM scm_evaluator_traps (SCM setting);
extern SCM scm_debug_options (SCM setting);
extern SCM scm_unmemoize (SCM memoized);
-extern SCM scm_make_debugobj (scm_debug_frame_t *debug);
+extern SCM scm_make_debugobj (scm_t_debug_frame *debug);
extern void scm_init_debug (void);
#ifdef GUILE_DEBUG