irwarning to use vcompile_warning

diff --git a/ir.c b/ir.c
index a2c4a8a53824ee75bad63af6598917c37d9b60af..3467d321057045264f4358ae15fa40ecd79fa1fe 100644 (file)
--- a/ir.c
+++ b/ir.c
@@ -208,20 +208,12 @@ static void irerror(lex_ctx ctx, const char *msg, ...)
 
 static bool irwarning(lex_ctx ctx, int warntype, const char *fmt, ...)
 {
+    bool    r;
        va_list ap;
-       int lvl = LVL_WARNING;
-
-    if (warntype && !OPTS_WARN(warntype))
-        return false;
-
-    if (opts.werror)
-           lvl = LVL_ERROR;
-
        va_start(ap, fmt);
-    con_vprintmsg(lvl, ctx.file, ctx.line, (opts.werror ? "error" : "warning"), fmt, ap);
+       r = vcompile_warning(ctx, warntype, fmt, ap);
        va_end(ap);
-
-       return opts.werror;
+       return r;
 }
 
 /***********************************************************************