alien.marshall: factorize-type before primitive-unmarshaller
parent
0aa1a9a43d
commit
787b5d618a
basis/alien/marshall
|
@ -259,4 +259,4 @@ M: struct-wrapper dynamic-cast ;
|
|||
[ const-type? not ]
|
||||
[ factorize-type pointer-to-primitive? ]
|
||||
} 1&&
|
||||
[ primitive-unmarshaller ] [ drop [ drop ] ] if ;
|
||||
[ factorize-type primitive-unmarshaller ] [ drop [ drop ] ] if ;
|
||||
|
|
Loading…
Reference in New Issue