add the source code for GNU lightning in the source directory for the C runtime

src/runtime/c/pgf/lightning/funcs-common.h

@@ -0,0 +1,54 @@
+/******************************** -*- C -*- ****************************
+ *
+ *	Platform-independent layer inline functions (common part)
+ *
+ ***********************************************************************/
+
+
+/***********************************************************************
+ *
+ * Copyright 2000, 2001, 2002 Free Software Foundation, Inc.
+ * Written by Paolo Bonzini.
+ *
+ * This file is part of GNU lightning.
+ *
+ * GNU lightning is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU Lesser General Public License as published
+ * by the Free Software Foundation; either version 2.1, or (at your option)
+ * any later version.
+ * 
+ * GNU lightning is distributed in the hope that it will be useful, but 
+ * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
+ * or  FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public
+ * License for more details.
+ * 
+ * You should have received a copy of the GNU Lesser General Public License
+ * along with GNU lightning; see the file COPYING.LESSER; if not, write to the
+ * Free Software Foundation, 59 Temple Place - Suite 330, Boston,
+ * MA 02111-1307, USA.
+ *
+ ***********************************************************************/
+
+#ifndef __lightning_funcs_common_h
+#define __lightning_funcs_common_h
+
+#include <stdio.h>
+#include <stdlib.h>
+
+static int jit_fail(const char *, const char*, int, const char *) JIT_UNUSED;
+
+int
+jit_fail(const char *msg, const char *file, int line, const char *function)
+{
+  fprintf(stderr, "%s: In function `%s':\n", file, function);
+  fprintf(stderr, "%s:%d: %s\n", file, line, msg);
+  abort();
+}
+
+
+#ifndef jit_start_pfx
+#define jit_start_pfx()                 ( (jit_insn*)0x4)
+#define jit_end_pfx()                   ( (jit_insn*)0x0)
+#endif
+
+#endif /* __lightning_funcs_common_h */