From 8975d167c849f54664be8d5da418cd909694d26f Mon Sep 17 00:00:00 2001
From: _ov4 <ov4@ov4.org>
Date: Tue, 20 Oct 2026 11:04:06 +0000
Subject: feat(library): add experimental string CHR function

Co-Authored-By: Claude Opus 5.5 <noreply@anthropic.com>
---
 pseudocode-lib/_exp_string.cc | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'pseudocode-lib/_exp_string.cc')

diff --git a/pseudocode-lib/_exp_string.cc b/pseudocode-lib/_exp_string.cc
index 6a17f74..ae53ac1 100644
--- a/pseudocode-lib/_exp_string.cc
+++ b/pseudocode-lib/_exp_string.cc
@@ -122,6 +122,11 @@ long long _exp_string_impl_asc(void *Handle) {
 long long _exp_string_impl_asc_char(char Ch) {
     return checked([&]() -> long long { return static_cast<unsigned char>(Ch); });
 }
+void _exp_string_impl_chr(void *Target, long long Code) {
+    checked([&] {
+        text(Target).assign(1, static_cast<char>(static_cast<unsigned char>(Code)));
+    });
+}
 void _exp_string_impl_output(void *Handle) {
     checked([&] {
         const auto &Text = text(Handle);
-- 
cgit v1.3.1-4-g156e