diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2022-03-21 06:16:43 -0700 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2022-03-21 06:16:43 -0700 |
| commit | af8b7db50fcc3ed34bfe1136d1664d59e89ba1a9 (patch) | |
| tree | 14a7981e70ecc67f165e848dd4e3d0a7349d8671 /stdlib | |
| parent | 3ce67812ebbbb8c0a82d77a72f565cda40bdec73 (diff) | |
| download | txr-af8b7db50fcc3ed34bfe1136d1664d59e89ba1a9.tar.gz txr-af8b7db50fcc3ed34bfe1136d1664d59e89ba1a9.tar.bz2 txr-af8b7db50fcc3ed34bfe1136d1664d59e89ba1a9.zip | |
New FFI types str-s, bstr-s and wstr-s.
These types actually make it possible to receive a string by
pointer from a C function, without trying to free it.
It is now possible to write a FFI wrapper for strtol or
wcstol, which is done in the new test case.
* ffi.c (str_s_s, bstr_s_s, wstr_s_s): New symbol variables.
(ffi_init_types): Register the types str-s, bstr-s and wstr-s.
(ffi_init): Intern the new symbols.
* tests/017/str-s.tl: New file.
* txr.1: Documented.
* stdlib/doc-syms.tl: Updated.
Diffstat (limited to 'stdlib')
| -rw-r--r-- | stdlib/doc-syms.tl | 15 |
1 files changed, 9 insertions, 6 deletions
diff --git a/stdlib/doc-syms.tl b/stdlib/doc-syms.tl index 179ce5e1..5ce5c0d0 100644 --- a/stdlib/doc-syms.tl +++ b/stdlib/doc-syms.tl @@ -168,8 +168,9 @@ ("bs0" "N-03BD477F") ("bs1" "N-03BD477F") ("bsdly" "N-03BD477F") - ("bstr" "N-00C6B7C4") - ("bstr-d" "N-00C6B7C4") + ("bstr" "N-0225F1EF") + ("bstr-d" "N-0225F1EF") + ("bstr-s" "N-0225F1EF") ("buf" "D-005E") ("buf-alloc-size" "N-013A3727") ("buf-carray" "N-0022F54E") @@ -1852,13 +1853,14 @@ ("static-slot-p" "N-032FD510") ("static-slot-set" "N-0017D1B5") ("stdlib" "N-008E4BC2") - ("str" "N-00C6B7C4") + ("str" "N-01736060") ("str-buf" "N-012BF6AD") - ("str-d" "N-00C6B7C4") + ("str-d" "N-01736060") ("str-in6addr" "N-01FF658D") ("str-in6addr-net" "N-00918411") ("str-inaddr" "N-01FF658D") ("str-inaddr-net" "N-00918411") + ("str-s" "N-01736060") ("str-seq" "N-02F0880D") ("str<" "N-01AA954A") ("str<=" "N-01AA954A") @@ -2195,8 +2197,9 @@ ("with-update-expander" "N-006EA023") ("wrap" "N-026DDCEC") ("wrap*" "N-026DDCEC") - ("wstr" "N-032DB6DC") - ("wstr-d" "N-032DB6DC") + ("wstr" "N-033B8A6D") + ("wstr-d" "N-033B8A6D") + ("wstr-s" "N-033B8A6D") ("xcase" "N-0072FF5E") ("yield" "N-02AE5C1E") ("yield-from" "N-01556613") |