aboutsummaryrefslogtreecommitdiff
path: root/libbuild2/functions-target-triplet.cxx
blob: 6e12c978703c8d9cb8b20b480bcaac52e236c8a8 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
// file      : libbuild2/functions-target-triplet.cxx -*- C++ -*-
// license   : MIT; see accompanying LICENSE file

#include <libbuild2/function.hxx>
#include <libbuild2/variable.hxx>

using namespace std;

namespace build2
{
  void
  target_triplet_functions (function_map& m)
  {
    function_family f (m, "target_triplet");

    // $string(<target-triplet>)
    //
    // Return the canonical (that is, without the `unknown` vendor component)
    // target triplet string.
    //

    // Note that we must handle NULL values (relied upon by the parser
    // to provide conversion semantics consistent with untyped values).
    //
    f["string"] += [](target_triplet* t)
    {
      return t != nullptr ? t->string () : string ();
    };

    // $representation(<target-triplet>)
    //
    // Return the complete target triplet string that always contains the
    // vendor component.
    //
    f["representation"] += [](target_triplet t)
    {
      return t.representation ();
    };

    // Target triplet-specific overloads from builtins.
    //
    function_family b (m, "builtin");

    // Note that while we should normally handle NULL values (relied upon by
    // the parser to provide concatenation semantics consistent with untyped
    // values), the result will unlikely be what the user expected. So for now
    // we keep it a bit tighter.
    //
    b[".concat"] += [](target_triplet l, string sr) {return l.string () + sr;};
    b[".concat"] += [](string sl, target_triplet r) {return sl + r.string ();};

    b[".concat"] += [](target_triplet l, names ur)
    {
      return l.string () + convert<string> (move (ur));
    };

    b[".concat"] += [](names ul, target_triplet r)
    {
      return convert<string> (move (ul)) + r.string ();
    };
  }
}