src/lj_assert.c

   1 /*
   2 ** Internal assertions.
   3 ** Copyright (C) 2005-2023 Mike Pall. See Copyright Notice in luajit.h
   4 */
   5
   6 #define lj_assert_c
   7 #define LUA_CORE
   8
   9 #if defined(LUA_USE_ASSERT) || defined(LUA_USE_APICHECK)
  10
  11 #include <stdio.h>
  12
  13 #include "lj_obj.h"
  14
  15 void lj_assert_fail(global_State *g, const char *file, int line,
  16                     const char *func, const char *fmt, ...)
  17 {
  18   va_list argp;
  19   va_start(argp, fmt);
  20   fprintf(stderr, "LuaJIT ASSERT %s:%d: %s: ", file, line, func);
  21   vfprintf(stderr, fmt, argp);
  22   fputc('\n', stderr);
  23   va_end(argp);
  24   UNUSED(g);  /* May be NULL. TODO: optionally dump state. */
  25   abort();
  26 }
  27
  28 #endif