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

trying to memory>struct a non-struct class is feptastic

db4
Joe Groff 2009-08-26 19:09:38 -05:00
parent 49d123aa84
commit 9eb4ce2791
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/struct-arrays/struct-arrays.factor
View File

@ -20,7 +20,7 @@ M: struct-array byte-length [ length>> ] [ element-size>> ] bi * ;
[ element-size>> * ] [ underlying>> ] bi <displaced-alien> ; inline
M: struct-array nth-unsafe
[ (nth-ptr) ] [ class>> ] bi [ memory>struct ] when* ; inline
[ (nth-ptr) ] [ class>> struct-class? ] bi [ memory>struct ] when* ; inline
M: struct-array set-nth-unsafe
[ (nth-ptr) swap ] [ element-size>> ] bi memcpy ;