Add clAsString.

fubark · Sep 2, 2024 · 4f2ca7e · 4f2ca7e
1 parent 0d38c46
commit 4f2ca7e
Show file tree

Hide file tree

Showing 3 changed files with 8 additions and 0 deletions.
diff --git a/src/capi.zig b/src/capi.zig
@@ -74,6 +74,9 @@ pub fn symbol(vm: *ZVM, str: []const u8) Value {
     return c.clSymbol(@ptrCast(vm), toStr(str));
 }
 pub const asSymbolId = c.clAsSymbolId;
+pub fn asString(val: Value) []const u8 {
+    return fromStr(c.clAsString(val));
+}
 pub const clTrue = c.clTrue;
 pub const clFalse = c.clFalse;
 pub const asBoxInt = c.clAsBoxInt;

diff --git a/src/include/cyber.h b/src/include/cyber.h
@@ -582,6 +582,7 @@ CLStr clNewValueDump(CLVM* vm, CLValue val);
 double clAsFloat(CLValue val);
 bool clToBool(CLValue val);
 bool clAsBool(CLValue val);
+CLStr clAsString(CLValue val);
 int64_t clAsBoxInt(CLValue val);
 uint32_t clAsSymbolId(CLValue val);
 CLStr clToTempString(CLVM* vm, CLValue val);

diff --git a/src/lib.zig b/src/lib.zig
@@ -751,6 +751,10 @@ test "clAsBoxInt()" {
     try t.eq(c.asBoxInt(val), 123);
 }
 
+export fn clAsString(val: cy.Value) c.Str {
+    return c.toStr(val.asString());
+}
+
 export fn clAsSymbolId(val: Value) u32 {
     return val.asSymbolId();
 }