Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

[cage] improve IMCC_debug_ins for headerizer

the odd function format was not picked up by the headerizer
add pod also

INLINE to imc.h added by headerizer
  • Loading branch information...
commit 4a1d5b24aed576cf10c93b81a367a049d73449a4 1 parent 15db84b
@rurban rurban authored
View
15 compilers/imcc/debug.c
@@ -243,7 +243,20 @@ IMCC_debug(ARGMOD(imc_info_t * imcc), int level, ARGIN(const char *fmt), ...)
va_end(ap);
}
-void IMCC_debug_ins(imc_info_t *imcc, int level, const Instruction *ins) {
+/*
+
+=item C<void IMCC_debug_ins(imc_info_t *imcc, int level, const Instruction
+*ins)>
+
+Prints a instruction debug message to STDERR, if IMCC's debug mode is turned on.
+
+=cut
+
+*/
+
+void
+IMCC_debug_ins(ARGMOD(imc_info_t *imcc), int level, ARGIN(const Instruction *ins))
+{
PIOHANDLE pstderr;
if (!(level & imcc->debug))
return;
View
12 compilers/imcc/debug.h
@@ -1,5 +1,5 @@
/*
- * Copyright (C) 2002-2009, Parrot Foundation.
+ * Copyright (C) 2002-2014, Parrot Foundation.
*/
#ifndef PARROT_IMCC_DEBUG_H_GUARD
@@ -23,7 +23,7 @@
#define DEBUG_REG2 0x0400
*/
-#define DEBUG_PBC 0x1000
+#define DEBUG_PBC 0x1000
#define DEBUG_PBC_CONST 0x2000
#define DEBUG_PBC_FIXUP 0x4000
@@ -65,12 +65,12 @@ void IMCC_debug(
FUNC_MODIFIES(* imcc);
void IMCC_debug_ins(
- ARGMOD(imc_info_t * imcc),
+ ARGMOD(imc_info_t *imcc),
int level,
ARGIN(const Instruction *ins))
__attribute__nonnull__(1)
__attribute__nonnull__(3)
- FUNC_MODIFIES(* imcc);
+ FUNC_MODIFIES(*imcc);
PARROT_DOES_NOT_RETURN
void IMCC_fatal(
@@ -134,6 +134,9 @@ void IMCC_warning(ARGMOD(imc_info_t * imcc), ARGIN(const char *fmt), ...)
#define ASSERT_ARGS_IMCC_debug __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
PARROT_ASSERT_ARG(imcc) \
, PARROT_ASSERT_ARG(fmt))
+#define ASSERT_ARGS_IMCC_debug_ins __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
+ PARROT_ASSERT_ARG(imcc) \
+ , PARROT_ASSERT_ARG(ins))
#define ASSERT_ARGS_IMCC_fatal __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
PARROT_ASSERT_ARG(imcc) \
, PARROT_ASSERT_ARG(fmt))
@@ -152,7 +155,6 @@ void IMCC_warning(ARGMOD(imc_info_t * imcc), ARGIN(const char *fmt), ...)
/* Don't modify between HEADERIZER BEGIN / HEADERIZER END. Your changes will be lost. */
/* HEADERIZER END: compilers/imcc/debug.c */
-
#endif /* PARROT_IMCC_DEBUG_H_GUARD */
/*
View
1  compilers/imcc/imc.h
@@ -227,6 +227,7 @@ int imcc_string_ends_with(
FUNC_MODIFIES(* imcc);
PARROT_IGNORABLE_RESULT
+PARROT_INLINE
int /*@alt void@*/
imcc_vfprintf(
ARGMOD(imc_info_t * imcc),
Please sign in to comment.
Something went wrong with that request. Please try again.