1 files changed, 66 insertions, 0 deletions
diff --git a/misc/examples/vikings.c b/misc/examples/vikings.c
new file mode 100644
index 00000000..26a74757
--- /dev/null
+++ b/misc/examples/vikings.c
@@ -0,0 +1,66 @@
+#include <stc/cstr.h>
+
+typedef struct Viking {
+    cstr name;
+    cstr country;
+} Viking;
+
+void Viking_drop(Viking* vk) {
+    cstr_drop(&vk->name);
+    cstr_drop(&vk->country);
+}
+
+// Define Viking lookup struct with hash, cmp, and convertion functions between Viking and RViking structs:
+
+typedef struct RViking {
+    const char* name;
+    const char* country;
+} RViking;
+
+static inline int RViking_cmp(const RViking* rx, const RViking* ry) {
+    int c = strcmp(rx->name, ry->name);
+    return c ? c : strcmp(rx->country, ry->country);
+}
+
+static inline Viking Viking_from(RViking raw) { // note: parameter is by value
+    return c_INIT(Viking){cstr_from(raw.name), cstr_from(raw.country)};
+}
+
+static inline RViking Viking_toraw(const Viking* vp) {
+    return c_INIT(RViking){cstr_str(&vp->name), cstr_str(&vp->country)};
+}
+
+// With this in place, we define the Viking => int hash map type:
+#define i_type      Vikings
+#define i_keyclass  Viking      // key type
+#define i_rawclass  RViking     // lookup type
+#define i_keyfrom   Viking_from
+#define i_opt       c_no_clone
+#define i_hash(rp)  cstrhash(rp->name) ^ cstrhash(rp->country)
+#define i_val       int         // mapped type
+#include <stc/cmap.h>
+/*
+ i_keyclass implies these defines, unless they are already defined:
+   i_cmp        => RViking_cmp
+   //i_hash     => RViking_hash     // already defined.
+   //i_keyclone => Viking_clone     // not used, because of c_no_clone
+   i_keyto      => Viking_toraw     // because i_rawclass is defined
+   i_keydrop    => Viking_drop
+*/
+
+int main()
+{
+    c_auto (Vikings, vikings) {
+        Vikings_emplace(&vikings, (RViking){"Einar", "Norway"}, 20);
+        Vikings_emplace(&vikings, (RViking){"Olaf", "Denmark"}, 24);
+        Vikings_emplace(&vikings, (RViking){"Harald", "Iceland"}, 12);
+        Vikings_emplace(&vikings, (RViking){"Björn", "Sweden"}, 10);
+
+        Vikings_value* v = Vikings_get_mut(&vikings, (RViking){"Einar", "Norway"});
+        v->second += 3; // add 3 hp points to Einar
+
+        c_forpair (vk, hp, Vikings, vikings) {
+            printf("%s of %s has %d hp\n", cstr_str(&_.vk->name), cstr_str(&_.vk->country), *_.hp);
+        }
+    }
+}