From f73d1a4b3fef52efe0190c086264d6f5f755a9e2 Mon Sep 17 00:00:00 2001
From: Andinus <andinus@nand.sh>
Date: Sat, 11 Sep 2021 18:51:23 +0530
Subject: Raku: Add Allergies

---
 raku/allergies/Allergies.rakumod | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)
 create mode 100644 raku/allergies/Allergies.rakumod

(limited to 'raku/allergies/Allergies.rakumod')

diff --git a/raku/allergies/Allergies.rakumod b/raku/allergies/Allergies.rakumod
new file mode 100644
index 0000000..9fda548
--- /dev/null
+++ b/raku/allergies/Allergies.rakumod
@@ -0,0 +1,18 @@
+unit module Allergies;
+
+constant %allergens = (
+    eggs         => 0b1,
+    peanuts      => 0b10,
+    shellfish    => 0b100,
+    strawberries => 0b1000,
+    tomatoes     => 0b10000,
+    chocolate    => 0b100000,
+    pollen       => 0b1000000,
+    cats         => 0b10000000,
+);
+
+sub allergic-to( :$item, :$score ) is export {
+}
+
+sub list-allergies($score) is export {
+}
-- 
cgit 1.4.1-2-gfad0