; and now for a puny enhancement compared to the previous one ;)

MACRO: (sort-args) ( stencil -- thunk )
    [ \ and 3array >quotation ] map-index [ || ] curry ;

: sort-args ( args stencil -- sorted-args )
    '[ [ _ (sort-args) ] bi@ <=> ] sort ; inline

{ { } 0 "hey" } { fixnum? string? array? } sort-args .

--- Data stack:
{ 0 "hey" { } }