Permalink
Switch branches/tags
Find file
Fetching contributors…
Cannot retrieve contributors at this time
109 lines (88 sloc) 3.55 KB
/*
* Copyright (C) 2002-2007, Parrot Foundation.
*/
#ifndef PARROT_WARNINGS_H_GUARD
#define PARROT_WARNINGS_H_GUARD
/* These should be visible to embedders. */
/* Warning flags */
/* &gen_from_enum(warnings.pasm) */
typedef enum {
PARROT_WARNINGS_ALL_FLAG = 0xFF,
PARROT_WARNINGS_NONE_FLAG = 0x00,
PARROT_WARNINGS_UNDEF_FLAG = 0x01,
PARROT_WARNINGS_IO_FLAG = 0x02,
PARROT_WARNINGS_PLATFORM_FLAG = 0x04,
PARROT_WARNINGS_DYNEXT_FLAG = 0x08,
PARROT_WARNINGS_DEPRECATED_FLAG = 0x10,
PARROT_WARNINGS_EXPERIMENTAL_FLAG = 0x20
} Warnings_classes;
/* Legacy embedding holdover. We can get rid of this after a deprecation */
typedef Warnings_classes Parrot_warnclass;
/* &end_gen */
/* error flags */
/* &gen_from_enum(errors.pasm) */
typedef enum {
PARROT_ERRORS_NONE_FLAG = 0x00,
PARROT_ERRORS_OVERFLOW_FLAG = 0x02,
PARROT_ERRORS_PARAM_COUNT_FLAG = 0x04,
PARROT_ERRORS_RESULT_COUNT_FLAG = 0x08,
PARROT_ERRORS_ALL_FLAG = 0xFF
} Errors_classes;
/* &end_gen */
#define PARROT_WARNINGS_on(interp, flag) Parrot_pcc_warnings_on((interp), (interp)->ctx, (flag))
#define PARROT_WARNINGS_off(interp, flag) Parrot_pcc_warnings_off((interp), (interp)->ctx, (flag))
#define PARROT_WARNINGS_test(interp, flag) Parrot_pcc_warnings_test((interp), (interp)->ctx, (flag))
#define PARROT_ERRORS_on(interp, flag) Parrot_pcc_errors_on((interp), (interp)->ctx, (flag))
#define PARROT_ERRORS_off(interp, flag) Parrot_pcc_errors_off((interp), (interp)->ctx, (flag))
#define PARROT_ERRORS_test(interp, flag) Parrot_pcc_errors_test((interp), (interp)->ctx, (flag))
#if defined(PARROT_IN_CORE)
#include "parrot/parrot.h"
/* HEADERIZER BEGIN: src/warnings.c */
/* Don't modify between HEADERIZER BEGIN / HEADERIZER END. Your changes will be lost. */
PARROT_EXPORT
void Parrot_print_pbc_location(PARROT_INTERP)
__attribute__nonnull__(1);
PARROT_EXPORT
PARROT_IGNORABLE_RESULT
INTVAL /*@alt void@*/
Parrot_warn(PARROT_INTERP,
INTVAL warnclass,
ARGIN(const char *message),
...)
__attribute__nonnull__(1)
__attribute__nonnull__(3);
PARROT_EXPORT
void Parrot_warn_deprecated(PARROT_INTERP, ARGIN(const char *message))
__attribute__nonnull__(1)
__attribute__nonnull__(2);
PARROT_EXPORT
void Parrot_warn_experimental(PARROT_INTERP, ARGIN(const char *message))
__attribute__nonnull__(1)
__attribute__nonnull__(2);
PARROT_EXPORT
PARROT_DEPRECATED
void print_pbc_location(PARROT_INTERP)
__attribute__nonnull__(1);
#define ASSERT_ARGS_Parrot_print_pbc_location __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
PARROT_ASSERT_ARG(interp))
#define ASSERT_ARGS_Parrot_warn __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
PARROT_ASSERT_ARG(interp) \
, PARROT_ASSERT_ARG(message))
#define ASSERT_ARGS_Parrot_warn_deprecated __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
PARROT_ASSERT_ARG(interp) \
, PARROT_ASSERT_ARG(message))
#define ASSERT_ARGS_Parrot_warn_experimental __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
PARROT_ASSERT_ARG(interp) \
, PARROT_ASSERT_ARG(message))
#define ASSERT_ARGS_print_pbc_location __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
PARROT_ASSERT_ARG(interp))
/* Don't modify between HEADERIZER BEGIN / HEADERIZER END. Your changes will be lost. */
/* HEADERIZER END: src/warnings.c */
#endif /* PARROT_IN_CORE */
#endif /* PARROT_WARNINGS_H_GUARD */
/*
* Local variables:
* c-file-style: "parrot"
* End:
* vim: expandtab shiftwidth=4 cinoptions='\:2=2' :
*/