summaryrefslogtreecommitdiff
path: root/starts/meaning-vm/level-1/sugar.hpp
blob: c34f0133d871d5a727d1a32d6eac0a1bcf2c25de (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
#pragma once

#include "common.hpp"
#include "ref.hpp"

#include <string>
#include <sstream>

namespace intellect {
namespace level1 {

ref a(ref group);
ref an(ref group);
ref a(ref group, ref name);
ref an(ref group, ref name);

/*
inline std::string operator+(vref<std::string> a, char const * b) { return std::string(a) + b; }
inline std::string operator+(vref<std::string> a, std::string b) { return std::string(a) + b; }
inline std::string operator+(char const * a, vref<std::string> b) { return a + std::string(b); }
inline std::string operator+(std::string a, vref<std::string> b) { return a + std::string(b); }
*/

namespace internal {
	template <typename... T>
	void init_ref_names(std::string names, T &... refrefs)
	{
		std::stringstream ss(names);
		ref* refptrs[] = {&refrefs...};
		for (std::size_t i = 0; i < sizeof...(refrefs); ++ i) {
			std::string name;
			ss >> name;
			if (name[name.size() - 1] == ',') {
				name = name.substr(0, name.size() - 1);
			}
			refptrs[i]->ptr() = ref(name).ptr();
		}
	}
}

#define decl(...) \
	intellect::level1::ref __VA_ARGS__; \
	intellect::level1::internal::init_ref_names(#__VA_ARGS__, __VA_ARGS__)

ref operator-(ref a, ref b);

}
}