steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

alien.strings: Actually return a string instead of an array of strings in 

M\ array symbol>string. Fixes #1098.
db4
Doug Coleman 2014-07-08 13:49:11 -05:00
parent ee08a436fd
commit 26a8cbbab4
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
core/alien/strings/strings.factor
View File

@ -83,9 +83,9 @@ M: sequence string>symbol [ utf8 string>alien ] map ;
: (symbol>string) ( alien -- str ) : (symbol>string) ( alien -- str )
utf8 alien>string ; utf8 alien>string ;
GENERIC: symbol>string ( symbol(s) -- string(s) ) GENERIC: symbol>string ( symbol(s) -- string )
M: byte-array symbol>string (symbol>string) ; M: byte-array symbol>string (symbol>string) ;
M: array symbol>string [ (symbol>string) ] map ; M: array symbol>string [ (symbol>string) ] map ", " join ;
[ [
OBJ-CPU special-object utf8 alien>string string>cpu \ cpu set-global OBJ-CPU special-object utf8 alien>string string>cpu \ cpu set-global