From 9a8b020269e25db3b42bb2d41d46e50b743e6cba Mon Sep 17 00:00:00 2001
From: Andreas Rumpf <rumpf_a@web.de>
Date: Thu, 5 Oct 2017 12:29:52 +0200
Subject: [PATCH] added 'kstrLits' macro

---
 karax/lookuptables.nim | 14 ++++++++++++++
 1 file changed, 14 insertions(+)

diff --git a/karax/lookuptables.nim b/karax/lookuptables.nim
index c888b49..1a1d51d 100644
--- a/karax/lookuptables.nim
+++ b/karax/lookuptables.nim
@@ -13,6 +13,20 @@ macro fieldNamesAsArray*(t: typed; pattern = "$1"): untyped =
     expectKind x, nnkIdentDefs
     result.add(newCall(bindSym"kstring", newLit(pattern.strVal % $x[0])))
 
+proc str(n: NimNode): NimNode =
+  if n.kind in {nnkStrLit, nnkTripleStrLit}:
+    result = newCall(bindSym"kstring", n)
+  else:
+    result = copyNimNode(n)
+    for i in 0..<n.len:
+      result.add str(n[i])
+
+macro kstrLits*(x: untyped): untyped =
+  ## Transforms every string literal "abc" to ``kstring"abc"``. This makes
+  ## things much easier to write. String literals of the form ``r"abc"`` are
+  ## not affected.
+  result = str(x)
+
 when isMainModule:
   type
     MyObject = ref object