From a0dba2acdeb6e2e9af8e53a4d886fba79c7a3afe Mon Sep 17 00:00:00 2001 From: _ov4 Date: Fri, 23 Oct 2026 01:21:23 +0000 Subject: feat(stdlib): add a CHAR overload of STR_TO_NUM Co-Authored-By: Claude Opus 5.5 --- pseudocode-lib/string.cps | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'pseudocode-lib/string.cps') diff --git a/pseudocode-lib/string.cps b/pseudocode-lib/string.cps index 1ad63d3..cb06758 100644 --- a/pseudocode-lib/string.cps +++ b/pseudocode-lib/string.cps @@ -78,9 +78,13 @@ OVERLOAD FUNCTION NUM_TO_STR(Number : REAL) RETURNS STRING CALL _string_impl_from_real(Result._HANDLE, (C_DOUBLE)Number) RETURN Result ENDFUNCTION -FUNCTION STR_TO_NUM(S : STRING) RETURNS REAL +OVERLOAD FUNCTION STR_TO_NUM(S : STRING) RETURNS REAL RETURN (REAL)_string_impl_to_real(S._HANDLE) ENDFUNCTION +OVERLOAD FUNCTION STR_TO_NUM(C : CHAR) RETURNS REAL + DECLARE S : STRING(1, (C_CHAR)C) + RETURN STR_TO_NUM(S) +ENDFUNCTION FUNCTION LENGTH(S : STRING) RETURNS INTEGER RETURN (INTEGER)_string_impl_length(S._HANDLE) ENDFUNCTION -- cgit v1.3.1-4-g156e