hurr
parent
dd6308ead5
commit
c8eddf89e6
|
@ -21,7 +21,7 @@ IN: alien.parser
|
|||
} cond ;
|
||||
|
||||
: valid-c-type? ( c-type -- ? )
|
||||
{ [ array? ] [ c-type-name? ] } 1|| ;
|
||||
{ [ array? ] [ c-type-name? ] [ void? ] } 1|| ;
|
||||
|
||||
: parse-c-type ( string -- type )
|
||||
(parse-c-type) dup valid-c-type? [ no-c-type ] unless ;
|
||||
|
|
Loading…
Reference in New Issue