diff --git a/basis/alien/inline/inline.factor b/basis/alien/inline/inline.factor index 2500021247..b71341ab6d 100644 --- a/basis/alien/inline/inline.factor +++ b/basis/alien/inline/inline.factor @@ -42,7 +42,7 @@ SYMBOL: c-strings : prototype-string ( function types effect -- str ) [ [ cify-type ] map ] dip types-effect>params-return cify-type -rot - 2 group [ " " join "," append ] map " " join + [ " " join ] map ", " join "(" prepend ")" append 3array " " join library-is-c++ get [ "extern \"C\" " prepend ] when ;