#include <mLib/darray.h>
#include <mLib/dstr.h>
+#include <mLib/macros.h>
#include <mLib/mdwopt.h>
#include <mLib/quis.h>
#include <mLib/report.h>
const char *header = "wheel.h";
const char *name = "wheel";
const char *sym = 0;
+ const char *hdrbase;
unsigned long i, n;
unsigned long mod;
int o;
}
}
+ if ((hdrbase = strrchr(header, '/')) == 0) hdrbase = header;
+ else hdrbase++;
+
for (mod = 1, i = 2, n = 0;
n < np;
i++) {
if (!sym) {
for (q = header; *q; q++) {
int ch = (unsigned char)*q;
- if (isalnum(ch))
- ch = toupper(ch);
+ if (ISALNUM(ch))
+ ch = TOUPPER(ch);
else
ch = '_';
DPUTC(&d, ch);
#include \"%s\"\n\
\n\
const %s %s[] = {",
- header, type, name);
+ hdrbase, type, name);
for (i = 0; i < DA_LEN(&v); i++) {
if (i % 8 == 0)
fputs("\n ", fp);