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

alien.parser: method object return-type-name is redundant

char-rename
Björn Lindqvist 2016-08-09 12:19:27 +02:00
parent ed29fbd93f
commit dbd716cc99
2 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
basis/alien/parser/parser-tests.factor
View File

@ -46,6 +46,11 @@ IN: alien.parser.tests
{ "ayae" } [ parse-enum-name new-definitions get first in? ] with-parsing { "ayae" } [ parse-enum-name new-definitions get first in? ] with-parsing
] unit-test ] unit-test
! return-type-name
{ "void" } [
void return-type-name
] unit-test
>> >>
TYPEDEF: char char2 TYPEDEF: char char2

1
basis/alien/parser/parser.factor
View File

@ -74,7 +74,6 @@ ERROR: *-in-c-type-name name ;
<PRIVATE <PRIVATE
GENERIC: return-type-name ( type -- name ) GENERIC: return-type-name ( type -- name )
M: object return-type-name drop "void" ;
M: word return-type-name name>> ; M: word return-type-name name>> ;
M: pointer return-type-name to>> return-type-name CHAR: * suffix ; M: pointer return-type-name to>> return-type-name CHAR: * suffix ;