add isanonymous, movetoname, decl[s], and nothing concept

1 files changed, 5 insertions, 0 deletions

diff --git a/starts/meaning-vm/level-1/funcs.cpp b/starts/meaning-vm/level-1/funcs.cpp
index c9cca37..0a481e9 100644
--- a/starts/meaning-vm/level-1/funcs.cpp
+++ b/starts/meaning-vm/level-1/funcs.cpp
@@ -74,6 +74,11 @@ value<T>* valloc(T const & val)
 	return ret;
 }
 
+concept* hyphenate(concept* a, concept* b)
+{
+	return getnamed(getname(a)->data + "-" + getname(b)->data);
+}
+
 template value<std::string>* valloc<std::string>(std::string const & val);
 template value<int>* valloc<int>(int const & val);