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

byte-length on f outputs 0

db4
Slava Pestov 2009-02-06 10:16:51 -06:00
parent 5579de1722
commit 33b513fb05
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
basis/alien/c-types/c-types.factor
View File

@ -178,6 +178,8 @@ GENERIC: byte-length ( seq -- n ) flushable
M: byte-array byte-length length ; M: byte-array byte-length length ;
M: f byte-length drop 0 ;
: c-getter ( name -- quot ) : c-getter ( name -- quot )
c-type-getter [ c-type-getter [
[ "Cannot read struct fields with this type" throw ] [ "Cannot read struct fields with this type" throw ]