diff options
Diffstat (limited to 'pseudocode-lib/string.cps')
| -rw-r--r-- | pseudocode-lib/string.cps | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/pseudocode-lib/string.cps b/pseudocode-lib/string.cps index 41181c4..a118326 100644 --- a/pseudocode-lib/string.cps +++ b/pseudocode-lib/string.cps @@ -52,6 +52,9 @@ CLASS STRING OVERLOAD PROCEDURE OPERATOR<-(Text : C_STRING) CALL _string_impl_assign_cstr(_HANDLE, Text) ENDPROCEDURE + FUNCTION _LENGTH() RETURNS INTEGER + RETURN (INTEGER)_string_impl_length(_HANDLE) + ENDFUNCTION FUNCTION C_STR() RETURNS C_STRING RETURN _string_impl_c_str(_HANDLE) ENDFUNCTION |