Fix internal compiler error with function call casts

Handle function call casts in a similar way whether the name
is a function identifier or a function pointer.

Author: gklimowicz

tools/flang2/flang2exe/cgmain.cpp

@@ -6852,7 +6852,7 @@ gen_call_expr(int ilix, DTYPE ret_dtype, INSTR_LIST *call_instr, int call_sptr)
   LL_ABI_Info *abi;
   LL_Type *return_type;
   OPERAND *first_arg_op;
-  OPERAND *callee_op;
+  OPERAND *callee_op = NULL;
   LL_Type *func_type = NULL;
   OPERAND *result_op = NULL;
   bool contains_x86_mmx = false;
@@ -6937,7 +6937,9 @@ gen_call_expr(int ilix, DTYPE ret_dtype, INSTR_LIST *call_instr, int call_sptr)
     /* Indirect call: JSRA addr arg-lnk flags */
     int addr_ili = ILI_OPND(ilix, 1);
     if (!func_type) {
-      func_type = ll_abi_function_type(abi);
+      func_type = abi->is_varargs ? ll_abi_function_type(abi) :
+        make_function_type_from_args(
+            ll_abi_return_type(abi), first_arg_op, abi->call_as_varargs);
     }
     /* Now that we know the desired type we can create the callee address
        expression. */