alien.enums: cleanup using.

db4
John Benediktsson 2014-06-30 09:09:46 -07:00
parent 85fdc4f6d2
commit 055cacabd4
1 changed files with 4 additions and 4 deletions

View File

@ -1,7 +1,7 @@
! (c)2010 Joe Groff, Erik Charlebois bsd license
USING: accessors alien.c-types arrays combinators delegate fry
generic.parser kernel macros math parser sequences words words.symbol
classes.singleton assocs ;
USING: accessors alien.c-types arrays assocs classes.singleton
combinators delegate fry kernel macros math parser sequences
words ;
IN: alien.enums
<PRIVATE
@ -52,6 +52,6 @@ PRIVATE>
: define-enum ( word base-type members -- )
[ (define-enum) ]
[ [ define-enum-value ] assoc-each ] bi ;
PREDICATE: enum-c-type-word < c-type-word
"c-type" word-prop enum-c-type? ;