From be14801929cf2a6caced87df034ae12a85f42aa6 Mon Sep 17 00:00:00 2001
From: Boris Kolpackov <boris@codesynthesis.com>
Date: Wed, 30 Nov 2016 17:32:43 +0200
Subject: Add support for typed/untyped concatenated expansion

---
 build2/functions-string.cxx | 39 +++++++++++++++++++++++++++++++++++++++
 1 file changed, 39 insertions(+)
 create mode 100644 build2/functions-string.cxx

(limited to 'build2/functions-string.cxx')

diff --git a/build2/functions-string.cxx b/build2/functions-string.cxx
new file mode 100644
index 0000000..1bf7aa8
--- /dev/null
+++ b/build2/functions-string.cxx
@@ -0,0 +1,39 @@
+// file      : build2/functions-string.cxx -*- C++ -*-
+// copyright : Copyright (c) 2014-2016 Code Synthesis Ltd
+// license   : MIT; see accompanying LICENSE file
+
+#include <build2/function>
+#include <build2/variable>
+
+using namespace std;
+
+namespace build2
+{
+  void
+  string_functions ()
+  {
+    function_family f ("string");
+
+    f["string"] = [](string s)  {return s;};
+    f["string"] = [](strings v) {return v;};
+
+    // String-specific overloads from builtins.
+    //
+    function_family b ("builtin");
+
+    b[".concat"] = [](string l, string r) {l += r; return l;};
+
+    b[".concat"] = [](string l, names ur)
+    {
+      l += convert<string> (move (ur));
+      return l;
+    };
+
+    b[".concat"] = [](names ul, string r)
+    {
+      string l (convert<string> (move (ul)));
+      l += r;
+      return l;
+    };
+  }
+}
-- 
cgit v1.1