         ! [fortran-invoke]
         [
             c:void "funpack" "fun_times_"
-            { c:char* long c:char* c:void* c:char* c:long c:long } 
+            { pointer: { c:char 10 } long pointer: { c:char 20 } pointer: c:float pointer: { c:char 30 } c:long c:long } 
             alien-invoke
         ] 7 nkeep
         ! [fortran-results>]

        ! [fortran-invoke]
        [ 
            c:void "funpack" "funtimes_"
            { c:char* c:void* c:void* c:void* c:void* c:long }
            alien-invoke
        ] 6 nkeep
        ! [fortran-results>]

        ! [fortran-invoke]
        [
            c:void "funpack" "fun_times_"
            { pointer: complex-float pointer: { c:float 0 } } 
            alien-invoke
        ] 2 nkeep
        ! [fortran-results>]
