noun: noop, C 'types' being what they are...

This commit is contained in:
Jōshin 2022-01-30 13:09:20 -06:00
parent 0248f57f0b
commit a4b40d104c
No known key found for this signature in database
GPG Key ID: A8BE5A9A521639D0
2 changed files with 4 additions and 4 deletions

View File

@ -127,12 +127,12 @@
/* u3i_string(): Produce an LSB-first atom from the C string [a].
*/
u3_noun
u3_atom
u3i_string(const c3_c* a_c);
/* u3i_tape(): from a C string, to a list of bytes.
*/
u3_atom
u3_noun
u3i_tape(const c3_c* txt_c);
/* u3i_list(): list from `u3_none`-terminated varargs.

View File

@ -541,7 +541,7 @@ u3i_qual(u3_noun a, u3_noun b, u3_noun c, u3_noun d)
/* u3i_string(): Produce an LSB-first atom from the C string [a].
*/
u3_noun
u3_atom
u3i_string(const c3_c* a_c)
{
return u3i_bytes(strlen(a_c), (c3_y *)a_c);
@ -549,7 +549,7 @@ u3i_string(const c3_c* a_c)
/* u3i_tape(): from a C string, to a list of bytes.
*/
u3_atom
u3_noun
u3i_tape(const c3_c* txt_c)
{
if ( !*txt_c ) {