Initial import of xtrkcad version 1:4.0.2-2

1 files changed, 29 insertions, 0 deletions

diff --git a/app/tools/halibut/charset/slookup.c b/app/tools/halibut/charset/slookup.c
new file mode 100644
index 0000000..7a4d7c2
--- /dev/null
+++ b/app/tools/halibut/charset/slookup.c
@@ -0,0 +1,29 @@
+/*
+ * slookup.c - static lookup of character sets.
+ */
+
+#include "charset.h"
+#include "internal.h"
+
+#define ENUM_CHARSET(x) extern charset_spec const charset_##x;
+#include "enum.c"
+#undef ENUM_CHARSET
+
+static charset_spec const *const cs_table[] = {
+
+#define ENUM_CHARSET(x) &charset_##x,
+#include "enum.c"
+#undef ENUM_CHARSET
+
+};
+
+charset_spec const *charset_find_spec(int charset)
+{
+    int i;
+
+    for (i = 0; i < (int)lenof(cs_table); i++)
+	if (cs_table[i]->charset == charset)
+	    return cs_table[i];
+
+    return NULL;
+}