allow getting meta name values in macros

This commit is contained in:
2024-08-17 17:39:53 -05:00
parent f2cff4803e
commit deda28ac35
2 changed files with 8 additions and 0 deletions

View File

@@ -123,6 +123,7 @@ class Kiss {
"symbolName" => Symbol("Prelude.symbolName"),
"symbolNameValue" => Symbol("Prelude.symbolNameValue"),
"typeNameValue" => Symbol("Prelude.typeNameValue"),
"metaNameValue" => Symbol("Prelude.metaNameValue"),
"typeName" => Symbol("Prelude.typeNameValue"),
"symbol" => Symbol("Prelude.symbol"),
"expList" => Symbol("Prelude.expList"),

View File

@@ -561,6 +561,13 @@ class Prelude {
throw expected(s, allowed);
};
}
public static function metaNameValue(s:ReaderExp):String {
return switch (s.def) {
case MetaExp(meta, _): meta;
default: "";
};
}
public static function uuid() {
return Uuid.v4().toShort();