about summary refs log tree commit diff
path: root/third_party/immer/extra/guile/scm/detail/util.hpp
blob: fdc323722e994daecd881ef14e3dc40d2c92743c (plain) (blame)
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
//
// immer: immutable data structures for C++
// Copyright (C) 2016, 2017, 2018 Juan Pedro Bolivar Puente
//
// This software is distributed under the Boost Software License, Version 1.0.
// See accompanying file LICENSE or copy at http://boost.org/LICENSE_1_0.txt
//

#pragma once

#include <libguile.h>

namespace scm {
namespace detail {

#define SCM_DECLTYPE_RETURN(...)                \
    decltype(__VA_ARGS__)                       \
    { return __VA_ARGS__; }                     \
    /**/

template <typename... Ts>
constexpr bool is_valid_v = true;

template <typename... Ts>
using is_valid_t = void;

template <typename... Ts>
void check_call_once()
{
    static bool called = false;
    if (called) scm_misc_error (nullptr, "Double defined binding. \
This may be caused because there are multiple C++ binding groups in the same \
translation unit.  You may solve this by using different type tags for each \
binding group.", SCM_EOL);
    called = true;
}

struct move_sequence
{
    move_sequence() = default;
    move_sequence(const move_sequence&) = delete;
    move_sequence(move_sequence&& other)
    { other.moved_from_ = true; };

    bool moved_from_ = false;
};

} // namespace detail
} // namespace scm