mirror of
https://github.com/nunuhara/xsystem4.git
synced 2026-10-13 17:58:37 +03:00
Nunuhara Cabbage
eaa0baad7f
Add a mechanism for libraries to resolve incompatibilities between library versions before linking. This is currently used for ChipmunkSpriteEngine and GoatGUIEngine, where early versions used integer IDs when loading CGs (later versions use strings).
53 lines
1.6 KiB
C
53 lines
1.6 KiB
C
/* Copyright (C) 2019 Nunuhara Cabbage <nunuhara@haniwa.technology>
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 2 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* This program 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 General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, see <http://gnu.org/licenses/>.
|
|
*/
|
|
|
|
#ifndef SYSTEM4_HLL_H
|
|
#define SYSTEM4_HLL_H
|
|
|
|
/*
|
|
* DSL for implementing libraries.
|
|
*/
|
|
|
|
#include "vm.h"
|
|
#include "system4.h"
|
|
|
|
void static_library_replace(struct static_library *lib, const char *name, void *fun);
|
|
|
|
#define HLL_WARN_UNIMPLEMENTED(rval, rtype, libname, fname, ...) \
|
|
static rtype libname ## _ ## fname(__VA_ARGS__) { \
|
|
WARNING("Unimplemented HLL function: " #libname "." #fname); \
|
|
return rval; \
|
|
}
|
|
|
|
#define HLL_QUIET_UNIMPLEMENTED(rval, rtype, libname, fname, ...) \
|
|
static rtype libname ## _ ## fname(__VA_ARGS__) { \
|
|
return rval; \
|
|
}
|
|
|
|
#define HLL_EXPORT(fname, funptr) { .name = #fname, .fun = funptr }
|
|
#define HLL_TODO_EXPORT(fname, funptr) { .name = #fname, .fun = NULL }
|
|
|
|
#define HLL_LIBRARY(lname, ...) \
|
|
struct static_library lib_ ## lname = { \
|
|
.name = #lname, \
|
|
.functions = { \
|
|
__VA_ARGS__, \
|
|
{ .name = NULL, .fun = NULL } \
|
|
} \
|
|
}
|
|
|
|
#endif /* SYSTEM4_HLL_H */
|