alien: fix some bugs.
parent
048703d6ce
commit
7065aa70d2
|
@ -117,5 +117,5 @@ TYPEDEF: int alien-parser-test-int ; ! reasonably unique name...
|
||||||
|
|
||||||
! Redefinitions
|
! Redefinitions
|
||||||
{ } [
|
{ } [
|
||||||
[ c-type: hi TYPEDEF: void* hi ] with-compilation-unit
|
[ c-type: hi TYPEDEF: void* hi ; ] with-compilation-unit
|
||||||
] unit-test
|
] unit-test
|
||||||
|
|
|
@ -52,6 +52,7 @@ M: typedef-word synopsis*
|
||||||
[ definer. ]
|
[ definer. ]
|
||||||
[ "c-type" word-prop pprint-c-type ]
|
[ "c-type" word-prop pprint-c-type ]
|
||||||
[ pprint-word ]
|
[ pprint-word ]
|
||||||
|
[ drop ";" text ]
|
||||||
} cleave ;
|
} cleave ;
|
||||||
|
|
||||||
: pprint-function-arg ( type name -- )
|
: pprint-function-arg ( type name -- )
|
||||||
|
|
Loading…
Reference in New Issue