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

fix bug in pointer type parsing

db4
Joe Groff 2009-09-15 22:10:16 -05:00
parent 3b4330fcf6
commit 26026ff6de
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -79,11 +79,9 @@ M: string c-type ( name -- type )
CHAR: ] over member? [ CHAR: ] over member? [
parse-array-type prefix parse-array-type prefix
] [ ] [
dup c-types get at [ dup c-types get at [ ] [
resolve-typedef
] [
"*" ?tail [ resolve-pointer-type ] [ no-c-type ] if "*" ?tail [ resolve-pointer-type ] [ no-c-type ] if
] ?if ] ?if resolve-typedef
] if ; ] if ;
M: word c-type M: word c-type