X-Git-Url: https://git.stderr.nl/gitweb?a=blobdiff_plain;f=interpreters%2Fnitfol%2Fblorb.c;fp=interpreters%2Fnitfol%2Fblorb.c;h=aedb96fa3d1495f5618a08df2cd45367c1d9d703;hb=c98ccb87aa2581cbcd0458682727274b6e9a8cf7;hp=0000000000000000000000000000000000000000;hpb=a1689380dcfe59c99e70da8c311ace071d113ce5;p=rodin%2Fchimara.git

diff --git a/interpreters/nitfol/blorb.c b/interpreters/nitfol/blorb.c
new file mode 100644
index 0000000..aedb96f
--- /dev/null
+++ b/interpreters/nitfol/blorb.c
@@ -0,0 +1,34 @@
+#include "nitfol.h"
+#include "gi_blorb.h"
+
+/* Link this in only if your glk supports blorb */
+
+giblorb_err_t wrap_gib_create_map(strid_t file, giblorb_map_t **newmap)
+{
+  return giblorb_create_map(file, newmap);
+}
+
+
+giblorb_err_t wrap_gib_destroy_map(giblorb_map_t *map)
+{
+  return giblorb_destroy_map(map);
+}
+
+
+giblorb_err_t wrap_gib_load_resource(giblorb_map_t *map, glui32 method, giblorb_result_t *res, glui32 usage, glui32 resnum)
+{
+  return giblorb_load_resource(map, method, res, usage, resnum);
+}
+
+
+giblorb_err_t wrap_gib_count_resources(giblorb_map_t *map, glui32 usage, glui32 *num, glui32 *min, glui32 *max)
+{
+  return giblorb_count_resources(map, usage, num, min, max);
+}
+
+
+giblorb_err_t wrap_gib_set_resource_map(strid_t file)
+{
+  return giblorb_set_resource_map(file);
+}
+