Restoring authorship annotation for Mikhail Borisov <borisov.mikhail@gmail.com>. Commit 1 of 2.

70 files changed, 1511 insertions, 1511 deletions

diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex.inc b/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex.inc
index 4a812edf05..80c5b04bb6 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex.inc
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex.inc
@@ -1,91 +1,91 @@
-/* -*-c-*- */
-#include "ffitest.h"
-#include <complex.h>
-
-typedef struct cls_struct_align {
-  unsigned char a;
-  _Complex T_C_TYPE b;
-  unsigned char c;
-} cls_struct_align;
-
-cls_struct_align cls_struct_align_fn(
-	struct cls_struct_align a1, struct cls_struct_align a2)
-{
-  struct cls_struct_align result;
-
-  result.a = a1.a + a2.a;
-  result.b = a1.b + a2.b;
-  result.c = a1.c + a2.c;
-
-  printf("%d %f,%fi %d %d %f,%fi %d: %d %f,%fi %d\n",
-	 a1.a, T_CONV creal (a1.b), T_CONV cimag (a1.b), a1.c,
-	 a2.a, T_CONV creal (a2.b), T_CONV cimag (a2.b), a2.c,
-	 result.a, T_CONV creal (result.b), T_CONV cimag (result.b), result.c);
-
-  return  result;
-}
-
-static void
-cls_struct_align_gn(ffi_cif* cif __UNUSED__, void* resp, void** args,
-		    void* userdata __UNUSED__)
-{
-
-  struct cls_struct_align a1, a2;
-
-  a1 = *(struct cls_struct_align*)(args[0]);
-  a2 = *(struct cls_struct_align*)(args[1]);
-
-  *(cls_struct_align*)resp = cls_struct_align_fn(a1, a2);
-}
-
-int main (void)
-{
-  ffi_cif cif;
-  void *code;
-  ffi_closure *pcl = ffi_closure_alloc(sizeof(ffi_closure), &code);
-  void* args_c[5];
-  ffi_type* cls_struct_fields[4];
-  ffi_type cls_struct_type;
-  ffi_type* c_arg_types[5];
-
-  struct cls_struct_align g_c = { 12, 4951 + 7 * I, 127 };
-  struct cls_struct_align f_c = { 1, 9320 + 1 * I, 13 };
-  struct cls_struct_align res_c;
-
-  cls_struct_type.size = 0;
-  cls_struct_type.alignment = 0;
-  cls_struct_type.type = FFI_TYPE_STRUCT;
-  cls_struct_type.elements = cls_struct_fields;
-
-  cls_struct_fields[0] = &ffi_type_uchar;
-  cls_struct_fields[1] = &T_FFI_TYPE;
-  cls_struct_fields[2] = &ffi_type_uchar;
-  cls_struct_fields[3] = NULL;
-
-  c_arg_types[0] = &cls_struct_type;
-  c_arg_types[1] = &cls_struct_type;
-  c_arg_types[2] = NULL;
-
-  CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 2, &cls_struct_type,
-		     c_arg_types) == FFI_OK);
-
-  args_c[0] = &g_c;
-  args_c[1] = &f_c;
-  args_c[2] = NULL;
-
-  ffi_call(&cif, FFI_FN(cls_struct_align_fn), &res_c, args_c);
-  /* { dg-output "12 4951,7i 127 1 9320,1i 13: 13 14271,8i 140" } */
-  printf("res: %d %f,%fi %d\n",
-	 res_c.a, T_CONV  creal (res_c.b), T_CONV  cimag (res_c.b), res_c.c);
-  /* { dg-output "\nres: 13 14271,8i 140" } */
-
-  CHECK(ffi_prep_closure_loc(pcl, &cif, cls_struct_align_gn, NULL, code) == FFI_OK);
-
-  res_c = ((cls_struct_align(*)(cls_struct_align, cls_struct_align))(code))(g_c, f_c);
-  /* { dg-output "\n12 4951,7i 127 1 9320,1i 13: 13 14271,8i 140" } */
-  printf("res: %d %f,%fi %d\n",
-	 res_c.a, T_CONV  creal (res_c.b), T_CONV  cimag (res_c.b), res_c.c);
-  /* { dg-output "\nres: 13 14271,8i 140" } */
-
-  exit(0);
-}
+/* -*-c-*- */ 
+#include "ffitest.h" 
+#include <complex.h> 
+ 
+typedef struct cls_struct_align { 
+  unsigned char a; 
+  _Complex T_C_TYPE b; 
+  unsigned char c; 
+} cls_struct_align; 
+ 
+cls_struct_align cls_struct_align_fn( 
+	struct cls_struct_align a1, struct cls_struct_align a2) 
+{ 
+  struct cls_struct_align result; 
+ 
+  result.a = a1.a + a2.a; 
+  result.b = a1.b + a2.b; 
+  result.c = a1.c + a2.c; 
+ 
+  printf("%d %f,%fi %d %d %f,%fi %d: %d %f,%fi %d\n", 
+	 a1.a, T_CONV creal (a1.b), T_CONV cimag (a1.b), a1.c, 
+	 a2.a, T_CONV creal (a2.b), T_CONV cimag (a2.b), a2.c, 
+	 result.a, T_CONV creal (result.b), T_CONV cimag (result.b), result.c); 
+ 
+  return  result; 
+} 
+ 
+static void 
+cls_struct_align_gn(ffi_cif* cif __UNUSED__, void* resp, void** args, 
+		    void* userdata __UNUSED__) 
+{ 
+ 
+  struct cls_struct_align a1, a2; 
+ 
+  a1 = *(struct cls_struct_align*)(args[0]); 
+  a2 = *(struct cls_struct_align*)(args[1]); 
+ 
+  *(cls_struct_align*)resp = cls_struct_align_fn(a1, a2); 
+} 
+ 
+int main (void) 
+{ 
+  ffi_cif cif; 
+  void *code; 
+  ffi_closure *pcl = ffi_closure_alloc(sizeof(ffi_closure), &code); 
+  void* args_c[5]; 
+  ffi_type* cls_struct_fields[4]; 
+  ffi_type cls_struct_type; 
+  ffi_type* c_arg_types[5]; 
+ 
+  struct cls_struct_align g_c = { 12, 4951 + 7 * I, 127 }; 
+  struct cls_struct_align f_c = { 1, 9320 + 1 * I, 13 }; 
+  struct cls_struct_align res_c; 
+ 
+  cls_struct_type.size = 0; 
+  cls_struct_type.alignment = 0; 
+  cls_struct_type.type = FFI_TYPE_STRUCT; 
+  cls_struct_type.elements = cls_struct_fields; 
+ 
+  cls_struct_fields[0] = &ffi_type_uchar; 
+  cls_struct_fields[1] = &T_FFI_TYPE; 
+  cls_struct_fields[2] = &ffi_type_uchar; 
+  cls_struct_fields[3] = NULL; 
+ 
+  c_arg_types[0] = &cls_struct_type; 
+  c_arg_types[1] = &cls_struct_type; 
+  c_arg_types[2] = NULL; 
+ 
+  CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 2, &cls_struct_type, 
+		     c_arg_types) == FFI_OK); 
+ 
+  args_c[0] = &g_c; 
+  args_c[1] = &f_c; 
+  args_c[2] = NULL; 
+ 
+  ffi_call(&cif, FFI_FN(cls_struct_align_fn), &res_c, args_c); 
+  /* { dg-output "12 4951,7i 127 1 9320,1i 13: 13 14271,8i 140" } */ 
+  printf("res: %d %f,%fi %d\n", 
+	 res_c.a, T_CONV  creal (res_c.b), T_CONV  cimag (res_c.b), res_c.c); 
+  /* { dg-output "\nres: 13 14271,8i 140" } */ 
+ 
+  CHECK(ffi_prep_closure_loc(pcl, &cif, cls_struct_align_gn, NULL, code) == FFI_OK); 
+ 
+  res_c = ((cls_struct_align(*)(cls_struct_align, cls_struct_align))(code))(g_c, f_c); 
+  /* { dg-output "\n12 4951,7i 127 1 9320,1i 13: 13 14271,8i 140" } */ 
+  printf("res: %d %f,%fi %d\n", 
+	 res_c.a, T_CONV  creal (res_c.b), T_CONV  cimag (res_c.b), res_c.c); 
+  /* { dg-output "\nres: 13 14271,8i 140" } */ 
+ 
+  exit(0); 
+} 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex_double.c b/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex_double.c
index 0dff23ae47..cf8cc09038 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex_double.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex_double.c
@@ -1,10 +1,10 @@
-/* Area:	ffi_call, closure_call
-   Purpose:	Check structure alignment of complex.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_double.inc"
-#include "cls_align_complex.inc"
+/* Area:	ffi_call, closure_call 
+   Purpose:	Check structure alignment of complex. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_double.inc" 
+#include "cls_align_complex.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex_double/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex_double/ya.make
index d83d272ce4..ab71e0fb72 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex_double/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex_double/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    cls_align_complex_double.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    cls_align_complex_double.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex_float.c b/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex_float.c
index 0affbd07e5..5f7bc7a02c 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex_float.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex_float.c
@@ -1,10 +1,10 @@
-/* Area:	ffi_call, closure_call
-   Purpose:	Check structure alignment of complex.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_float.inc"
-#include "cls_align_complex.inc"
+/* Area:	ffi_call, closure_call 
+   Purpose:	Check structure alignment of complex. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_float.inc" 
+#include "cls_align_complex.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex_float/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex_float/ya.make
index 57634effef..9f514f3cdd 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex_float/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex_float/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    cls_align_complex_float.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    cls_align_complex_float.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex_longdouble.c b/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex_longdouble.c
index 7889ba859b..c8307bf2d0 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex_longdouble.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex_longdouble.c
@@ -1,10 +1,10 @@
-/* Area:	ffi_call, closure_call
-   Purpose:	Check structure alignment of complex.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_longdouble.inc"
-#include "cls_align_complex.inc"
+/* Area:	ffi_call, closure_call 
+   Purpose:	Check structure alignment of complex. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_longdouble.inc" 
+#include "cls_align_complex.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex_longdouble/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex_longdouble/ya.make
index 455cfb8ac9..30064a1456 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex_longdouble/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_align_complex_longdouble/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    cls_align_complex_longdouble.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    cls_align_complex_longdouble.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex.inc b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex.inc
index f9374044e8..4f27d33417 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex.inc
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex.inc
@@ -1,42 +1,42 @@
-/* -*-c-*- */
-#include "ffitest.h"
-#include <complex.h>
-
-static void cls_ret_complex_fn(ffi_cif* cif __UNUSED__, void* resp, void** args,
-			      void* userdata __UNUSED__)
- {
-   _Complex T_C_TYPE *pa;
-   _Complex T_C_TYPE *pr;
-   pa = (_Complex T_C_TYPE *)args[0];
-   pr = (_Complex T_C_TYPE *)resp;
-   *pr = *pa;
-
-   printf("%.6f,%.6fi: %.6f,%.6fi\n",
-	  T_CONV creal (*pa), T_CONV cimag (*pa),
-	  T_CONV creal (*pr), T_CONV cimag (*pr));
- }
-typedef _Complex T_C_TYPE (*cls_ret_complex)(_Complex T_C_TYPE);
-
-int main (void)
-{
-  ffi_cif cif;
-  void *code;
-  ffi_closure *pcl = ffi_closure_alloc(sizeof(ffi_closure), &code);
-  ffi_type * cl_arg_types[2];
-  _Complex T_C_TYPE res;
-
-  cl_arg_types[0] = &T_FFI_TYPE;
-  cl_arg_types[1] = NULL;
-
-  /* Initialize the cif */
-  CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 1,
-		     &T_FFI_TYPE, cl_arg_types) == FFI_OK);
-
-  CHECK(ffi_prep_closure_loc(pcl, &cif, cls_ret_complex_fn, NULL, code)  == FFI_OK);
-
-  res = (*((cls_ret_complex)code))(0.125 + 128.0 * I);
-  printf("res: %.6f,%.6fi\n", T_CONV creal (res), T_CONV cimag (res));
-  CHECK (res == (0.125 + 128.0 * I));
-
-  exit(0);
-}
+/* -*-c-*- */ 
+#include "ffitest.h" 
+#include <complex.h> 
+ 
+static void cls_ret_complex_fn(ffi_cif* cif __UNUSED__, void* resp, void** args, 
+			      void* userdata __UNUSED__) 
+ { 
+   _Complex T_C_TYPE *pa; 
+   _Complex T_C_TYPE *pr; 
+   pa = (_Complex T_C_TYPE *)args[0]; 
+   pr = (_Complex T_C_TYPE *)resp; 
+   *pr = *pa; 
+ 
+   printf("%.6f,%.6fi: %.6f,%.6fi\n", 
+	  T_CONV creal (*pa), T_CONV cimag (*pa), 
+	  T_CONV creal (*pr), T_CONV cimag (*pr)); 
+ } 
+typedef _Complex T_C_TYPE (*cls_ret_complex)(_Complex T_C_TYPE); 
+ 
+int main (void) 
+{ 
+  ffi_cif cif; 
+  void *code; 
+  ffi_closure *pcl = ffi_closure_alloc(sizeof(ffi_closure), &code); 
+  ffi_type * cl_arg_types[2]; 
+  _Complex T_C_TYPE res; 
+ 
+  cl_arg_types[0] = &T_FFI_TYPE; 
+  cl_arg_types[1] = NULL; 
+ 
+  /* Initialize the cif */ 
+  CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 1, 
+		     &T_FFI_TYPE, cl_arg_types) == FFI_OK); 
+ 
+  CHECK(ffi_prep_closure_loc(pcl, &cif, cls_ret_complex_fn, NULL, code)  == FFI_OK); 
+ 
+  res = (*((cls_ret_complex)code))(0.125 + 128.0 * I); 
+  printf("res: %.6f,%.6fi\n", T_CONV creal (res), T_CONV cimag (res)); 
+  CHECK (res == (0.125 + 128.0 * I)); 
+ 
+  exit(0); 
+} 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_double.c b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_double.c
index 05e35340e0..e20b0b47f8 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_double.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_double.c
@@ -1,10 +1,10 @@
-/* Area:	closure_call
-   Purpose:	Check return value complex.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_double.inc"
-#include "cls_complex.inc"
+/* Area:	closure_call 
+   Purpose:	Check return value complex. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_double.inc" 
+#include "cls_complex.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_double/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_double/ya.make
index 2e37bfbd4b..712d62197b 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_double/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_double/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    cls_complex_double.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    cls_complex_double.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_float.c b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_float.c
index 5df7849d4c..0015dce62c 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_float.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_float.c
@@ -1,10 +1,10 @@
-/* Area:	closure_call
-   Purpose:	Check return value complex.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_float.inc"
-#include "cls_complex.inc"
+/* Area:	closure_call 
+   Purpose:	Check return value complex. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_float.inc" 
+#include "cls_complex.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_float/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_float/ya.make
index a837883fba..cce2de0d06 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_float/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_float/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    cls_complex_float.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    cls_complex_float.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_longdouble.c b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_longdouble.c
index 2b1c320a20..123fee50c4 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_longdouble.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_longdouble.c
@@ -1,10 +1,10 @@
-/* Area:	closure_call
-   Purpose:	Check return value complex.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_longdouble.inc"
-#include "cls_complex.inc"
+/* Area:	closure_call 
+   Purpose:	Check return value complex. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_longdouble.inc" 
+#include "cls_complex.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_longdouble/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_longdouble/ya.make
index 84c1f3c271..d51f8468ba 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_longdouble/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_longdouble/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    cls_complex_longdouble.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    cls_complex_longdouble.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct.inc b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct.inc
index df8708d1c4..c2b27564a4 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct.inc
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct.inc
@@ -1,71 +1,71 @@
-/* -*-c-*- */
-#include "ffitest.h"
-#include <complex.h>
-
-typedef struct Cs {
-  _Complex T_C_TYPE x;
-  _Complex T_C_TYPE y;
-} Cs;
-
-Cs gc;
-
-void
-closure_test_fn(Cs p)
-{
-  printf("%.1f,%.1fi %.1f,%.1fi\n",
-	 T_CONV creal (p.x), T_CONV cimag (p.x),
-	 T_CONV creal (p.y), T_CONV cimag (p.y));
-  gc = p;
-}
-
-void
-closure_test_gn(ffi_cif* cif __UNUSED__, void* resp __UNUSED__,
-		void** args, void* userdata __UNUSED__)
-{
-  closure_test_fn(*(Cs*)args[0]);
-}
-
-int main(int argc __UNUSED__, char** argv __UNUSED__)
-{
-  ffi_cif cif;
-
-  void *code;
-  ffi_closure *pcl = ffi_closure_alloc(sizeof(ffi_closure), &code);
-  ffi_type *cl_arg_types[1];
-
-  ffi_type ts1_type;
-  ffi_type* ts1_type_elements[4];
-
-  Cs arg = { 1.0 + 11.0 * I, 2.0 + 22.0 * I};
-
-  ts1_type.size = 0;
-  ts1_type.alignment = 0;
-  ts1_type.type = FFI_TYPE_STRUCT;
-  ts1_type.elements = ts1_type_elements;
-
-  ts1_type_elements[0] = &T_FFI_TYPE;
-  ts1_type_elements[1] = &T_FFI_TYPE;
-  ts1_type_elements[2] = NULL;
-
-  cl_arg_types[0] = &ts1_type;
-
-  /* Initialize the cif */
-  CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 1,
-		     &ffi_type_void, cl_arg_types) == FFI_OK);
-
-  CHECK(ffi_prep_closure_loc(pcl, &cif, closure_test_gn, NULL, code) == FFI_OK);
-
-  gc.x = 0.0 + 0.0 * I;
-  gc.y = 0.0 + 0.0 * I;
-  ((void*(*)(Cs))(code))(arg);
-  /* { dg-output "1.0,11.0i 2.0,22.0i\n" } */
-  CHECK (gc.x == arg.x && gc.y == arg.y);
-
-  gc.x = 0.0 + 0.0 * I;
-  gc.y = 0.0 + 0.0 * I;
-  closure_test_fn(arg);
-  /* { dg-output "1.0,11.0i 2.0,22.0i\n" } */
-  CHECK (gc.x == arg.x && gc.y == arg.y);
-
-  return 0;
-}
+/* -*-c-*- */ 
+#include "ffitest.h" 
+#include <complex.h> 
+ 
+typedef struct Cs { 
+  _Complex T_C_TYPE x; 
+  _Complex T_C_TYPE y; 
+} Cs; 
+ 
+Cs gc; 
+ 
+void 
+closure_test_fn(Cs p) 
+{ 
+  printf("%.1f,%.1fi %.1f,%.1fi\n", 
+	 T_CONV creal (p.x), T_CONV cimag (p.x), 
+	 T_CONV creal (p.y), T_CONV cimag (p.y)); 
+  gc = p; 
+} 
+ 
+void 
+closure_test_gn(ffi_cif* cif __UNUSED__, void* resp __UNUSED__, 
+		void** args, void* userdata __UNUSED__) 
+{ 
+  closure_test_fn(*(Cs*)args[0]); 
+} 
+ 
+int main(int argc __UNUSED__, char** argv __UNUSED__) 
+{ 
+  ffi_cif cif; 
+ 
+  void *code; 
+  ffi_closure *pcl = ffi_closure_alloc(sizeof(ffi_closure), &code); 
+  ffi_type *cl_arg_types[1]; 
+ 
+  ffi_type ts1_type; 
+  ffi_type* ts1_type_elements[4]; 
+ 
+  Cs arg = { 1.0 + 11.0 * I, 2.0 + 22.0 * I}; 
+ 
+  ts1_type.size = 0; 
+  ts1_type.alignment = 0; 
+  ts1_type.type = FFI_TYPE_STRUCT; 
+  ts1_type.elements = ts1_type_elements; 
+ 
+  ts1_type_elements[0] = &T_FFI_TYPE; 
+  ts1_type_elements[1] = &T_FFI_TYPE; 
+  ts1_type_elements[2] = NULL; 
+ 
+  cl_arg_types[0] = &ts1_type; 
+ 
+  /* Initialize the cif */ 
+  CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 1, 
+		     &ffi_type_void, cl_arg_types) == FFI_OK); 
+ 
+  CHECK(ffi_prep_closure_loc(pcl, &cif, closure_test_gn, NULL, code) == FFI_OK); 
+ 
+  gc.x = 0.0 + 0.0 * I; 
+  gc.y = 0.0 + 0.0 * I; 
+  ((void*(*)(Cs))(code))(arg); 
+  /* { dg-output "1.0,11.0i 2.0,22.0i\n" } */ 
+  CHECK (gc.x == arg.x && gc.y == arg.y); 
+ 
+  gc.x = 0.0 + 0.0 * I; 
+  gc.y = 0.0 + 0.0 * I; 
+  closure_test_fn(arg); 
+  /* { dg-output "1.0,11.0i 2.0,22.0i\n" } */ 
+  CHECK (gc.x == arg.x && gc.y == arg.y); 
+ 
+  return 0; 
+} 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct_double.c b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct_double.c
index ec71346a3f..64468ccd19 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct_double.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct_double.c
@@ -1,10 +1,10 @@
-/* Area:	ffi_call, closure_call
-   Purpose:	Check complex arguments in structs.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_double.inc"
-#include "cls_complex_struct.inc"
+/* Area:	ffi_call, closure_call 
+   Purpose:	Check complex arguments in structs. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_double.inc" 
+#include "cls_complex_struct.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct_double/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct_double/ya.make
index 67041b3b3d..9e06c5f890 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct_double/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct_double/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    cls_complex_struct_double.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    cls_complex_struct_double.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct_float.c b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct_float.c
index 96fdf75043..ec44bd1c4a 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct_float.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct_float.c
@@ -1,10 +1,10 @@
-/* Area:	ffi_call, closure_call
-   Purpose:	Check complex arguments in structs.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_float.inc"
-#include "cls_complex_struct.inc"
+/* Area:	ffi_call, closure_call 
+   Purpose:	Check complex arguments in structs. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_float.inc" 
+#include "cls_complex_struct.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct_float/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct_float/ya.make
index a73819b826..f54d1a858d 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct_float/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct_float/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    cls_complex_struct_float.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    cls_complex_struct_float.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct_longdouble.c b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct_longdouble.c
index 005b467398..9aa99f3671 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct_longdouble.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct_longdouble.c
@@ -1,10 +1,10 @@
-/* Area:	ffi_call, closure_call
-   Purpose:	Check complex arguments in structs.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_longdouble.inc"
-#include "cls_complex_struct.inc"
+/* Area:	ffi_call, closure_call 
+   Purpose:	Check complex arguments in structs. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_longdouble.inc" 
+#include "cls_complex_struct.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct_longdouble/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct_longdouble/ya.make
index 7e223a7b7e..f4cbcde654 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct_longdouble/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_struct_longdouble/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    cls_complex_struct_longdouble.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    cls_complex_struct_longdouble.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va.inc b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va.inc
index 8a3e15f0f6..fb413aa8d7 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va.inc
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va.inc
@@ -1,80 +1,80 @@
-/* -*-c-*- */
-#include "ffitest.h"
-#include <stdio.h>
-#include <stdlib.h>
-#include <stdarg.h>
-#include <complex.h>
-
-static _Complex T_C_TYPE gComplexValue1 = 1 + 2 * I;
-static _Complex T_C_TYPE gComplexValue2 = 3 + 4 * I;
-
-static int cls_variadic(const char *format, ...)
-{
-  va_list ap;
-  _Complex T_C_TYPE p1, p2;
-
-  va_start (ap, format);
-  p1 = va_arg (ap, _Complex T_C_TYPE);
-  p2 = va_arg (ap, _Complex T_C_TYPE);
-  va_end (ap);
-
-  return printf(format, T_CONV creal (p1), T_CONV cimag (p1),
-		T_CONV creal (p2), T_CONV cimag (p2));
-}
-
-static void
-cls_complex_va_fn(ffi_cif* cif __UNUSED__, void* resp,
-		  void** args, void* userdata __UNUSED__)
-{
-  char*	format = *(char**)args[0];
-  gComplexValue1 = *(_Complex T_C_TYPE*)args[1];
-  gComplexValue2 = *(_Complex T_C_TYPE*)args[2];
-
-  *(ffi_arg*)resp =
-    printf(format,
-	   T_CONV creal (gComplexValue1), T_CONV cimag (gComplexValue1),
-	   T_CONV creal (gComplexValue2), T_CONV cimag (gComplexValue2));
-}
-
-int main (void)
-{
-  ffi_cif cif;
-  void *code;
-  ffi_closure *pcl = ffi_closure_alloc(sizeof(ffi_closure), &code);
-  void* args[4];
-  ffi_type* arg_types[4];
-  char *format = "%.1f,%.1fi %.1f,%.1fi\n";
-
-  _Complex T_C_TYPE complexArg1 = 1.0 + 22.0 *I;
-  _Complex T_C_TYPE complexArg2 = 333.0 + 4444.0 *I;
-  ffi_arg res = 0;
-
-  arg_types[0] = &ffi_type_pointer;
-  arg_types[1] = &T_FFI_TYPE;
-  arg_types[2] = &T_FFI_TYPE;
-  arg_types[3] = NULL;
-
-  /* This printf call is variadic */
-  CHECK(ffi_prep_cif_var(&cif, FFI_DEFAULT_ABI, 1, 3, &ffi_type_sint,
-			 arg_types) == FFI_OK);
-
-  args[0] = &format;
-  args[1] = &complexArg1;
-  args[2] = &complexArg2;
-  args[3] = NULL;
-
-  ffi_call(&cif, FFI_FN(cls_variadic), &res, args);
-  printf("res: %d\n", (int) res);
-  CHECK (res == 24);
-
-  CHECK(ffi_prep_closure_loc(pcl, &cif, cls_complex_va_fn, NULL, code)
-	== FFI_OK);
-
-  res = ((int(*)(char *, ...))(code))(format, complexArg1, complexArg2);
-  CHECK (gComplexValue1 == complexArg1);
-  CHECK (gComplexValue2 == complexArg2);
-  printf("res: %d\n", (int) res);
-  CHECK (res == 24);
-
-  exit(0);
-}
+/* -*-c-*- */ 
+#include "ffitest.h" 
+#include <stdio.h> 
+#include <stdlib.h> 
+#include <stdarg.h> 
+#include <complex.h> 
+ 
+static _Complex T_C_TYPE gComplexValue1 = 1 + 2 * I; 
+static _Complex T_C_TYPE gComplexValue2 = 3 + 4 * I; 
+ 
+static int cls_variadic(const char *format, ...) 
+{ 
+  va_list ap; 
+  _Complex T_C_TYPE p1, p2; 
+ 
+  va_start (ap, format); 
+  p1 = va_arg (ap, _Complex T_C_TYPE); 
+  p2 = va_arg (ap, _Complex T_C_TYPE); 
+  va_end (ap); 
+ 
+  return printf(format, T_CONV creal (p1), T_CONV cimag (p1), 
+		T_CONV creal (p2), T_CONV cimag (p2)); 
+} 
+ 
+static void 
+cls_complex_va_fn(ffi_cif* cif __UNUSED__, void* resp, 
+		  void** args, void* userdata __UNUSED__) 
+{ 
+  char*	format = *(char**)args[0]; 
+  gComplexValue1 = *(_Complex T_C_TYPE*)args[1]; 
+  gComplexValue2 = *(_Complex T_C_TYPE*)args[2]; 
+ 
+  *(ffi_arg*)resp = 
+    printf(format, 
+	   T_CONV creal (gComplexValue1), T_CONV cimag (gComplexValue1), 
+	   T_CONV creal (gComplexValue2), T_CONV cimag (gComplexValue2)); 
+} 
+ 
+int main (void) 
+{ 
+  ffi_cif cif; 
+  void *code; 
+  ffi_closure *pcl = ffi_closure_alloc(sizeof(ffi_closure), &code); 
+  void* args[4]; 
+  ffi_type* arg_types[4]; 
+  char *format = "%.1f,%.1fi %.1f,%.1fi\n"; 
+ 
+  _Complex T_C_TYPE complexArg1 = 1.0 + 22.0 *I; 
+  _Complex T_C_TYPE complexArg2 = 333.0 + 4444.0 *I; 
+  ffi_arg res = 0; 
+ 
+  arg_types[0] = &ffi_type_pointer; 
+  arg_types[1] = &T_FFI_TYPE; 
+  arg_types[2] = &T_FFI_TYPE; 
+  arg_types[3] = NULL; 
+ 
+  /* This printf call is variadic */ 
+  CHECK(ffi_prep_cif_var(&cif, FFI_DEFAULT_ABI, 1, 3, &ffi_type_sint, 
+			 arg_types) == FFI_OK); 
+ 
+  args[0] = &format; 
+  args[1] = &complexArg1; 
+  args[2] = &complexArg2; 
+  args[3] = NULL; 
+ 
+  ffi_call(&cif, FFI_FN(cls_variadic), &res, args); 
+  printf("res: %d\n", (int) res); 
+  CHECK (res == 24); 
+ 
+  CHECK(ffi_prep_closure_loc(pcl, &cif, cls_complex_va_fn, NULL, code) 
+	== FFI_OK); 
+ 
+  res = ((int(*)(char *, ...))(code))(format, complexArg1, complexArg2); 
+  CHECK (gComplexValue1 == complexArg1); 
+  CHECK (gComplexValue2 == complexArg2); 
+  printf("res: %d\n", (int) res); 
+  CHECK (res == 24); 
+ 
+  exit(0); 
+} 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va_double.c b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va_double.c
index 879ccf3b81..b37e7ef503 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va_double.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va_double.c
@@ -1,10 +1,10 @@
-/* Area:	ffi_call, closure_call
-   Purpose:	Test complex' passed in variable argument lists.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_double.inc"
-#include "cls_complex_va.inc"
+/* Area:	ffi_call, closure_call 
+   Purpose:	Test complex' passed in variable argument lists. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_double.inc" 
+#include "cls_complex_va.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va_double/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va_double/ya.make
index 8f437dc41e..a3f2950e05 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va_double/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va_double/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    cls_complex_va_double.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    cls_complex_va_double.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va_float.c b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va_float.c
index 2b17826045..013edb8f06 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va_float.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va_float.c
@@ -1,16 +1,16 @@
-/* Area:	ffi_call, closure_call
-   Purpose:	Test complex' passed in variable argument lists.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-/* Alpha splits _Complex into two arguments.  It's illegal to pass
-   float through varargs, so _Complex float goes badly.  In sort of
-   gets passed as _Complex double, but the compiler doesn't agree
-   with itself on this issue.  */
-/* { dg-do run { xfail alpha*-*-* } } */
-
-#include "complex_defs_float.inc"
-#include "cls_complex_va.inc"
+/* Area:	ffi_call, closure_call 
+   Purpose:	Test complex' passed in variable argument lists. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+/* Alpha splits _Complex into two arguments.  It's illegal to pass 
+   float through varargs, so _Complex float goes badly.  In sort of 
+   gets passed as _Complex double, but the compiler doesn't agree 
+   with itself on this issue.  */ 
+/* { dg-do run { xfail alpha*-*-* } } */ 
+ 
+#include "complex_defs_float.inc" 
+#include "cls_complex_va.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va_float/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va_float/ya.make
index b936ee74d3..aa33956c76 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va_float/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va_float/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    cls_complex_va_float.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    cls_complex_va_float.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va_longdouble.c b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va_longdouble.c
index 6eca9656ea..5895b340c1 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va_longdouble.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va_longdouble.c
@@ -1,10 +1,10 @@
-/* Area:	ffi_call, closure_call
-   Purpose:	Test complex' passed in variable argument lists.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_longdouble.inc"
-#include "cls_complex_va.inc"
+/* Area:	ffi_call, closure_call 
+   Purpose:	Test complex' passed in variable argument lists. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_longdouble.inc" 
+#include "cls_complex_va.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va_longdouble/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va_longdouble/ya.make
index 4225df798e..7992138484 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va_longdouble/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/cls_complex_va_longdouble/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    cls_complex_va_longdouble.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    cls_complex_va_longdouble.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/complex.inc b/contrib/restricted/libffi/testsuite/libffi.complex/complex.inc
index 515ae3e60d..61c0994a19 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/complex.inc
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/complex.inc
@@ -1,51 +1,51 @@
-/* -*-c-*-*/
-#include "ffitest.h"
-#include <complex.h>
-
-static _Complex T_C_TYPE f_complex(_Complex T_C_TYPE c, int x, int *py)
-{
-  c = -(2 * creal (c)) + (cimag (c) + 1)* I;
-  *py += x;
-
-  return c;
-}
-
-int main (void)
-{
-  ffi_cif cif;
-  ffi_type *args[MAX_ARGS];
-  void *values[MAX_ARGS];
-
-  _Complex T_C_TYPE tc_arg;
-  _Complex T_C_TYPE tc_result;
-  int tc_int_arg_x;
-  int tc_y;
-  int *tc_ptr_arg_y = &tc_y;
-
-  args[0] = &T_FFI_TYPE;
-  args[1] = &ffi_type_sint;
-  args[2] = &ffi_type_pointer;
-  values[0] = &tc_arg;
-  values[1] = &tc_int_arg_x;
-  values[2] = &tc_ptr_arg_y;
-
-  /* Initialize the cif */
-  CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 3,
-		     &T_FFI_TYPE, args) == FFI_OK);
-
-  tc_arg = 1 + 7 * I;
-  tc_int_arg_x = 1234;
-  tc_y = 9876;
-  ffi_call(&cif, FFI_FN(f_complex), &tc_result, values);
-
-  printf ("%f,%fi %f,%fi, x %d 1234, y %d 11110\n",
-	  T_CONV creal (tc_result), T_CONV cimag (tc_result),
-	  T_CONV creal (2.0), T_CONV creal (8.0), tc_int_arg_x, tc_y);
-
-  CHECK (creal (tc_result) == -2);
-  CHECK (cimag (tc_result) == 8);
-  CHECK (tc_int_arg_x == 1234);
-  CHECK (*tc_ptr_arg_y == 11110);
-
-  exit(0);
-}
+/* -*-c-*-*/ 
+#include "ffitest.h" 
+#include <complex.h> 
+ 
+static _Complex T_C_TYPE f_complex(_Complex T_C_TYPE c, int x, int *py) 
+{ 
+  c = -(2 * creal (c)) + (cimag (c) + 1)* I; 
+  *py += x; 
+ 
+  return c; 
+} 
+ 
+int main (void) 
+{ 
+  ffi_cif cif; 
+  ffi_type *args[MAX_ARGS]; 
+  void *values[MAX_ARGS]; 
+ 
+  _Complex T_C_TYPE tc_arg; 
+  _Complex T_C_TYPE tc_result; 
+  int tc_int_arg_x; 
+  int tc_y; 
+  int *tc_ptr_arg_y = &tc_y; 
+ 
+  args[0] = &T_FFI_TYPE; 
+  args[1] = &ffi_type_sint; 
+  args[2] = &ffi_type_pointer; 
+  values[0] = &tc_arg; 
+  values[1] = &tc_int_arg_x; 
+  values[2] = &tc_ptr_arg_y; 
+ 
+  /* Initialize the cif */ 
+  CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 3, 
+		     &T_FFI_TYPE, args) == FFI_OK); 
+ 
+  tc_arg = 1 + 7 * I; 
+  tc_int_arg_x = 1234; 
+  tc_y = 9876; 
+  ffi_call(&cif, FFI_FN(f_complex), &tc_result, values); 
+ 
+  printf ("%f,%fi %f,%fi, x %d 1234, y %d 11110\n", 
+	  T_CONV creal (tc_result), T_CONV cimag (tc_result), 
+	  T_CONV creal (2.0), T_CONV creal (8.0), tc_int_arg_x, tc_y); 
+ 
+  CHECK (creal (tc_result) == -2); 
+  CHECK (cimag (tc_result) == 8); 
+  CHECK (tc_int_arg_x == 1234); 
+  CHECK (*tc_ptr_arg_y == 11110); 
+ 
+  exit(0); 
+} 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/complex_defs_double.inc b/contrib/restricted/libffi/testsuite/libffi.complex/complex_defs_double.inc
index 3583e166d6..7a35c8e1a8 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/complex_defs_double.inc
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/complex_defs_double.inc
@@ -1,7 +1,7 @@
-/* -*-c-*- */
-/* Complex base type.  */
-#define T_FFI_TYPE ffi_type_complex_double
-/* C type corresponding to the base type.  */
-#define T_C_TYPE double
-/* C cast for a value of type T_C_TYPE that is passed to printf.  */
-#define T_CONV
+/* -*-c-*- */ 
+/* Complex base type.  */ 
+#define T_FFI_TYPE ffi_type_complex_double 
+/* C type corresponding to the base type.  */ 
+#define T_C_TYPE double 
+/* C cast for a value of type T_C_TYPE that is passed to printf.  */ 
+#define T_CONV 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/complex_defs_float.inc b/contrib/restricted/libffi/testsuite/libffi.complex/complex_defs_float.inc
index bbd9375cbf..78811e884b 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/complex_defs_float.inc
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/complex_defs_float.inc
@@ -1,7 +1,7 @@
-/* -*-c-*- */
-/* Complex base type.  */
-#define T_FFI_TYPE ffi_type_complex_float
-/* C type corresponding to the base type.  */
-#define T_C_TYPE float
-/* C cast for a value of type T_C_TYPE that is passed to printf.  */
-#define T_CONV (double)
+/* -*-c-*- */ 
+/* Complex base type.  */ 
+#define T_FFI_TYPE ffi_type_complex_float 
+/* C type corresponding to the base type.  */ 
+#define T_C_TYPE float 
+/* C cast for a value of type T_C_TYPE that is passed to printf.  */ 
+#define T_CONV (double) 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/complex_defs_longdouble.inc b/contrib/restricted/libffi/testsuite/libffi.complex/complex_defs_longdouble.inc
index 14b9f243f4..3eb9ae3974 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/complex_defs_longdouble.inc
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/complex_defs_longdouble.inc
@@ -1,7 +1,7 @@
-/* -*-c-*- */
-/* Complex base type.  */
-#define T_FFI_TYPE ffi_type_complex_longdouble
-/* C type corresponding to the base type.  */
-#define T_C_TYPE long double
-/* C cast for a value of type T_C_TYPE that is passed to printf.  */
-#define T_CONV
+/* -*-c-*- */ 
+/* Complex base type.  */ 
+#define T_FFI_TYPE ffi_type_complex_longdouble 
+/* C type corresponding to the base type.  */ 
+#define T_C_TYPE long double 
+/* C cast for a value of type T_C_TYPE that is passed to printf.  */ 
+#define T_CONV 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/complex_double.c b/contrib/restricted/libffi/testsuite/libffi.complex/complex_double.c
index 8a3297b2a2..dffaa9acf2 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/complex_double.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/complex_double.c
@@ -1,10 +1,10 @@
-/* Area:	ffi_call
-   Purpose:	Check complex types.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_double.inc"
-#include "complex.inc"
+/* Area:	ffi_call 
+   Purpose:	Check complex types. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_double.inc" 
+#include "complex.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/complex_double/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/complex_double/ya.make
index 11976473c0..c73f64f997 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/complex_double/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/complex_double/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    complex_double.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    complex_double.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/complex_float.c b/contrib/restricted/libffi/testsuite/libffi.complex/complex_float.c
index 5044ebbcaa..9de6f54fb5 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/complex_float.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/complex_float.c
@@ -1,10 +1,10 @@
-/* Area:	ffi_call
-   Purpose:	Check complex types.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_float.inc"
-#include "complex.inc"
+/* Area:	ffi_call 
+   Purpose:	Check complex types. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_float.inc" 
+#include "complex.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/complex_float/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/complex_float/ya.make
index 02103a290e..33ca4b961a 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/complex_float/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/complex_float/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    complex_float.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    complex_float.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/complex_int.c b/contrib/restricted/libffi/testsuite/libffi.complex/complex_int.c
index bac319081e..c863e613aa 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/complex_int.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/complex_int.c
@@ -1,86 +1,86 @@
-/* Area:	ffi_call
-   Purpose:	Check non-standard complex types.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "ffitest.h"
-#include "ffi.h"
-#include <complex.h>
-
-_Complex int f_complex(_Complex int c, int x, int *py)
-{
-  __real__ c = -2 * __real__ c;
-  __imag__ c = __imag__ c + 1;
-  *py += x;
-  return c;
-}
-
-/*
- * This macro can be used to define new complex type descriptors
- * in a platform independent way.
- *
- * name: Name of the new descriptor is ffi_type_complex_<name>.
- * type: The C base type of the complex type.
- */
-#define FFI_COMPLEX_TYPEDEF(name, type, ffitype)	     \
-  static ffi_type *ffi_elements_complex_##name [2] = {	     \
-    (ffi_type *)(&ffitype), NULL			     \
-  };							     \
-  struct struct_align_complex_##name {			     \
-    char c;						     \
-    _Complex type x;					     \
-  };							     \
-  ffi_type ffi_type_complex_##name = {		     \
-    sizeof(_Complex type),				     \
-    offsetof(struct struct_align_complex_##name, x),	     \
-    FFI_TYPE_COMPLEX,					     \
-    (ffi_type **)ffi_elements_complex_##name		     \
-  }
-
-/* Define new complex type descriptors using the macro: */
-/* ffi_type_complex_sint */
-FFI_COMPLEX_TYPEDEF(sint, int, ffi_type_sint);
-/* ffi_type_complex_uchar */
-FFI_COMPLEX_TYPEDEF(uchar, unsigned char, ffi_type_uint8);
-
-int main (void)
-{
-  ffi_cif cif;
-  ffi_type *args[MAX_ARGS];
-  void *values[MAX_ARGS];
-
-  _Complex int tc_arg;
-  _Complex int tc_result;
-  int tc_int_arg_x;
-  int tc_y;
-  int *tc_ptr_arg_y = &tc_y;
-
-  args[0] = &ffi_type_complex_sint;
-  args[1] = &ffi_type_sint;
-  args[2] = &ffi_type_pointer;
-  values[0] = &tc_arg;
-  values[1] = &tc_int_arg_x;
-  values[2] = &tc_ptr_arg_y;
-
-  /* Initialize the cif */
-  CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 3, &ffi_type_complex_sint, args)
-	== FFI_OK);
-
-  tc_arg = 1 + 7 * I;
-  tc_int_arg_x = 1234;
-  tc_y = 9876;
-  ffi_call(&cif, FFI_FN(f_complex), &tc_result, values);
-
-  printf ("%d,%di %d,%di, x %d 1234, y %d 11110\n",
-	  (int)tc_result, (int)(tc_result * -I), 2, 8, tc_int_arg_x, tc_y);
-  /* dg-output "-2,8i 2,8i, x 1234 1234, y 11110 11110" */
-  CHECK (creal (tc_result) == -2);
-  CHECK (cimag (tc_result) == 8);
-  CHECK (tc_int_arg_x == 1234);
-  CHECK (*tc_ptr_arg_y == 11110);
-
-  exit(0);
-}
+/* Area:	ffi_call 
+   Purpose:	Check non-standard complex types. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "ffitest.h" 
+#include "ffi.h" 
+#include <complex.h> 
+ 
+_Complex int f_complex(_Complex int c, int x, int *py) 
+{ 
+  __real__ c = -2 * __real__ c; 
+  __imag__ c = __imag__ c + 1; 
+  *py += x; 
+  return c; 
+} 
+ 
+/* 
+ * This macro can be used to define new complex type descriptors 
+ * in a platform independent way. 
+ * 
+ * name: Name of the new descriptor is ffi_type_complex_<name>. 
+ * type: The C base type of the complex type. 
+ */ 
+#define FFI_COMPLEX_TYPEDEF(name, type, ffitype)	     \ 
+  static ffi_type *ffi_elements_complex_##name [2] = {	     \ 
+    (ffi_type *)(&ffitype), NULL			     \ 
+  };							     \ 
+  struct struct_align_complex_##name {			     \ 
+    char c;						     \ 
+    _Complex type x;					     \ 
+  };							     \ 
+  ffi_type ffi_type_complex_##name = {		     \ 
+    sizeof(_Complex type),				     \ 
+    offsetof(struct struct_align_complex_##name, x),	     \ 
+    FFI_TYPE_COMPLEX,					     \ 
+    (ffi_type **)ffi_elements_complex_##name		     \ 
+  } 
+ 
+/* Define new complex type descriptors using the macro: */ 
+/* ffi_type_complex_sint */ 
+FFI_COMPLEX_TYPEDEF(sint, int, ffi_type_sint); 
+/* ffi_type_complex_uchar */ 
+FFI_COMPLEX_TYPEDEF(uchar, unsigned char, ffi_type_uint8); 
+ 
+int main (void) 
+{ 
+  ffi_cif cif; 
+  ffi_type *args[MAX_ARGS]; 
+  void *values[MAX_ARGS]; 
+ 
+  _Complex int tc_arg; 
+  _Complex int tc_result; 
+  int tc_int_arg_x; 
+  int tc_y; 
+  int *tc_ptr_arg_y = &tc_y; 
+ 
+  args[0] = &ffi_type_complex_sint; 
+  args[1] = &ffi_type_sint; 
+  args[2] = &ffi_type_pointer; 
+  values[0] = &tc_arg; 
+  values[1] = &tc_int_arg_x; 
+  values[2] = &tc_ptr_arg_y; 
+ 
+  /* Initialize the cif */ 
+  CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 3, &ffi_type_complex_sint, args) 
+	== FFI_OK); 
+ 
+  tc_arg = 1 + 7 * I; 
+  tc_int_arg_x = 1234; 
+  tc_y = 9876; 
+  ffi_call(&cif, FFI_FN(f_complex), &tc_result, values); 
+ 
+  printf ("%d,%di %d,%di, x %d 1234, y %d 11110\n", 
+	  (int)tc_result, (int)(tc_result * -I), 2, 8, tc_int_arg_x, tc_y); 
+  /* dg-output "-2,8i 2,8i, x 1234 1234, y 11110 11110" */ 
+  CHECK (creal (tc_result) == -2); 
+  CHECK (cimag (tc_result) == 8); 
+  CHECK (tc_int_arg_x == 1234); 
+  CHECK (*tc_ptr_arg_y == 11110); 
+ 
+  exit(0); 
+} 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/complex_int/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/complex_int/ya.make
index 94f7e6ae6a..671dff8943 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/complex_int/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/complex_int/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    complex_int.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    complex_int.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/complex_longdouble.c b/contrib/restricted/libffi/testsuite/libffi.complex/complex_longdouble.c
index 7e78366093..098b494f42 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/complex_longdouble.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/complex_longdouble.c
@@ -1,10 +1,10 @@
-/* Area:	ffi_call
-   Purpose:	Check complex types.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_longdouble.inc"
-#include "complex.inc"
+/* Area:	ffi_call 
+   Purpose:	Check complex types. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_longdouble.inc" 
+#include "complex.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/complex_longdouble/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/complex_longdouble/ya.make
index c68e2c5613..ec73c64faa 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/complex_longdouble/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/complex_longdouble/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    complex_longdouble.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    complex_longdouble.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/ffitest.h b/contrib/restricted/libffi/testsuite/libffi.complex/ffitest.h
index d27d362d6a..1e9446fbbc 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/ffitest.h
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/ffitest.h
@@ -1 +1 @@
-#include "../libffi.call/ffitest.h"
+#include "../libffi.call/ffitest.h" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/many_complex.inc b/contrib/restricted/libffi/testsuite/libffi.complex/many_complex.inc
index e37a774397..b68458e862 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/many_complex.inc
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/many_complex.inc
@@ -1,78 +1,78 @@
-/* -*-c-*- */
-#include "ffitest.h"
-
-#include <stdlib.h>
-#include <complex.h>
-
-static _Complex T_C_TYPE many(_Complex T_C_TYPE c1,
-			      _Complex T_C_TYPE c2,
-			      _Complex T_C_TYPE c3,
-			      _Complex T_C_TYPE c4,
-			      _Complex T_C_TYPE c5,
-			      _Complex T_C_TYPE c6,
-			      _Complex T_C_TYPE c7,
-			      _Complex T_C_TYPE c8,
-			      _Complex T_C_TYPE c9,
-			      _Complex T_C_TYPE c10,
-			      _Complex T_C_TYPE c11,
-			      _Complex T_C_TYPE c12,
-			      _Complex T_C_TYPE c13)
-{
-  printf("0 :%f,%fi\n"
-	 "1 :%f,%fi\n"
-	 "2 :%f,%fi\n"
-	 "3 :%f,%fi\n"
-	 "4 :%f,%fi\n"
-	 "5 :%f,%fi\n"
-	 "6 :%f,%fi\n"
-	 "7 :%f,%fi\n"
-	 "8 :%f,%fi\n"
-	 "9 :%f,%fi\n"
-	 "10:%f,%fi\n"
-	 "11:%f,%fi\n"
-	 "12:%f,%fi\n",
-	 T_CONV creal (c1), T_CONV cimag (c1),
-	 T_CONV creal (c2), T_CONV cimag (c2),
-	 T_CONV creal (c3), T_CONV cimag (c3),
-	 T_CONV creal (c4), T_CONV cimag (c4),
-	 T_CONV creal (c5), T_CONV cimag (c5),
-	 T_CONV creal (c6), T_CONV cimag (c6),
-	 T_CONV creal (c7), T_CONV cimag (c7),
-	 T_CONV creal (c8), T_CONV cimag (c8),
-	 T_CONV creal (c9), T_CONV cimag (c9),
-	 T_CONV creal (c10), T_CONV cimag (c10),
-	 T_CONV creal (c11), T_CONV cimag (c11),
-	 T_CONV creal (c12), T_CONV cimag (c12),
-	 T_CONV creal (c13), T_CONV cimag (c13));
-
-  return (c1+c2-c3-c4+c5+c6+c7-c8-c9-c10-c11+c12+c13);
-}
-
-int main (void)
-{
-  ffi_cif cif;
-  ffi_type *args[13];
-  void *values[13];
-  _Complex T_C_TYPE ca[13];
-  _Complex T_C_TYPE c, cc;
-  int i;
-
-  for (i = 0; i < 13; i++)
-    {
-      args[i] = &T_FFI_TYPE;
-      values[i] = &ca[i];
-      ca[i] = i + (-20 - i) * I;
-    }
-
-    /* Initialize the cif */
-    CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 13, &T_FFI_TYPE, args) == FFI_OK);
-
-    ffi_call(&cif, FFI_FN(many), &c, values);
-
-    cc =  many(ca[0], ca[1], ca[2], ca[3], ca[4], ca[5], ca[6], ca[7], ca[8],
-	       ca[9], ca[10], ca[11], ca[12]);
-    CHECK(creal (cc) == creal (c));
-    CHECK(cimag (cc) == cimag (c));
-
-    exit(0);
-}
+/* -*-c-*- */ 
+#include "ffitest.h" 
+ 
+#include <stdlib.h> 
+#include <complex.h> 
+ 
+static _Complex T_C_TYPE many(_Complex T_C_TYPE c1, 
+			      _Complex T_C_TYPE c2, 
+			      _Complex T_C_TYPE c3, 
+			      _Complex T_C_TYPE c4, 
+			      _Complex T_C_TYPE c5, 
+			      _Complex T_C_TYPE c6, 
+			      _Complex T_C_TYPE c7, 
+			      _Complex T_C_TYPE c8, 
+			      _Complex T_C_TYPE c9, 
+			      _Complex T_C_TYPE c10, 
+			      _Complex T_C_TYPE c11, 
+			      _Complex T_C_TYPE c12, 
+			      _Complex T_C_TYPE c13) 
+{ 
+  printf("0 :%f,%fi\n" 
+	 "1 :%f,%fi\n" 
+	 "2 :%f,%fi\n" 
+	 "3 :%f,%fi\n" 
+	 "4 :%f,%fi\n" 
+	 "5 :%f,%fi\n" 
+	 "6 :%f,%fi\n" 
+	 "7 :%f,%fi\n" 
+	 "8 :%f,%fi\n" 
+	 "9 :%f,%fi\n" 
+	 "10:%f,%fi\n" 
+	 "11:%f,%fi\n" 
+	 "12:%f,%fi\n", 
+	 T_CONV creal (c1), T_CONV cimag (c1), 
+	 T_CONV creal (c2), T_CONV cimag (c2), 
+	 T_CONV creal (c3), T_CONV cimag (c3), 
+	 T_CONV creal (c4), T_CONV cimag (c4), 
+	 T_CONV creal (c5), T_CONV cimag (c5), 
+	 T_CONV creal (c6), T_CONV cimag (c6), 
+	 T_CONV creal (c7), T_CONV cimag (c7), 
+	 T_CONV creal (c8), T_CONV cimag (c8), 
+	 T_CONV creal (c9), T_CONV cimag (c9), 
+	 T_CONV creal (c10), T_CONV cimag (c10), 
+	 T_CONV creal (c11), T_CONV cimag (c11), 
+	 T_CONV creal (c12), T_CONV cimag (c12), 
+	 T_CONV creal (c13), T_CONV cimag (c13)); 
+ 
+  return (c1+c2-c3-c4+c5+c6+c7-c8-c9-c10-c11+c12+c13); 
+} 
+ 
+int main (void) 
+{ 
+  ffi_cif cif; 
+  ffi_type *args[13]; 
+  void *values[13]; 
+  _Complex T_C_TYPE ca[13]; 
+  _Complex T_C_TYPE c, cc; 
+  int i; 
+ 
+  for (i = 0; i < 13; i++) 
+    { 
+      args[i] = &T_FFI_TYPE; 
+      values[i] = &ca[i]; 
+      ca[i] = i + (-20 - i) * I; 
+    } 
+ 
+    /* Initialize the cif */ 
+    CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 13, &T_FFI_TYPE, args) == FFI_OK); 
+ 
+    ffi_call(&cif, FFI_FN(many), &c, values); 
+ 
+    cc =  many(ca[0], ca[1], ca[2], ca[3], ca[4], ca[5], ca[6], ca[7], ca[8], 
+	       ca[9], ca[10], ca[11], ca[12]); 
+    CHECK(creal (cc) == creal (c)); 
+    CHECK(cimag (cc) == cimag (c)); 
+ 
+    exit(0); 
+} 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/many_complex_double.c b/contrib/restricted/libffi/testsuite/libffi.complex/many_complex_double.c
index 3fd53c3354..378d4a156a 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/many_complex_double.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/many_complex_double.c
@@ -1,10 +1,10 @@
-/* Area:	ffi_call
-   Purpose:	Check return value complex, with many arguments
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_double.inc"
-#include "many_complex.inc"
+/* Area:	ffi_call 
+   Purpose:	Check return value complex, with many arguments 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_double.inc" 
+#include "many_complex.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/many_complex_double/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/many_complex_double/ya.make
index 2bcdfea7f1..5b85306b66 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/many_complex_double/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/many_complex_double/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    many_complex_double.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    many_complex_double.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/many_complex_float.c b/contrib/restricted/libffi/testsuite/libffi.complex/many_complex_float.c
index c43d21cd9e..24ea13ec3f 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/many_complex_float.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/many_complex_float.c
@@ -1,10 +1,10 @@
-/* Area:	ffi_call
-   Purpose:	Check return value complex, with many arguments
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_float.inc"
-#include "many_complex.inc"
+/* Area:	ffi_call 
+   Purpose:	Check return value complex, with many arguments 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_float.inc" 
+#include "many_complex.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/many_complex_float/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/many_complex_float/ya.make
index 82f2a93933..b525fbfa52 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/many_complex_float/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/many_complex_float/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    many_complex_float.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    many_complex_float.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/many_complex_longdouble.c b/contrib/restricted/libffi/testsuite/libffi.complex/many_complex_longdouble.c
index dbab723969..6d32b8b8d0 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/many_complex_longdouble.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/many_complex_longdouble.c
@@ -1,10 +1,10 @@
-/* Area:	ffi_call
-   Purpose:	Check return value complex, with many arguments
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_longdouble.inc"
-#include "many_complex.inc"
+/* Area:	ffi_call 
+   Purpose:	Check return value complex, with many arguments 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_longdouble.inc" 
+#include "many_complex.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/many_complex_longdouble/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/many_complex_longdouble/ya.make
index 68bf0b2407..64b7080575 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/many_complex_longdouble/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/many_complex_longdouble/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    many_complex_longdouble.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    many_complex_longdouble.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex.inc b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex.inc
index 8bf0c1fbab..590317e99b 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex.inc
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex.inc
@@ -1,37 +1,37 @@
-/* -*-c-*- */
-#include "ffitest.h"
-#include <complex.h>
-
-static _Complex T_C_TYPE return_c(_Complex T_C_TYPE c)
-{
-  printf ("%f,%fi\n", T_CONV creal (c), T_CONV cimag (c));
-  return 2 * c;
-}
-int main (void)
-{
-  ffi_cif cif;
-  ffi_type *args[MAX_ARGS];
-  void *values[MAX_ARGS];
-  _Complex T_C_TYPE c, rc, rc2;
-  T_C_TYPE cr, ci;
-
-  args[0] = &T_FFI_TYPE;
-  values[0] = &c;
-
-  /* Initialize the cif */
-  CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 1,
-		     &T_FFI_TYPE, args) == FFI_OK);
-
-  for (cr = -127.0; cr <  127; cr++)
-    {
-      ci = 1000.0 - cr;
-      c = cr + ci * I;
-      ffi_call(&cif, FFI_FN(return_c), &rc, values);
-      rc2 = return_c(c);
-      printf ("%f,%fi vs %f,%fi\n",
-	      T_CONV creal (rc), T_CONV cimag (rc),
-	      T_CONV creal (rc2), T_CONV cimag (rc2));
-      CHECK(rc == 2 * c);
-    }
-  exit(0);
-}
+/* -*-c-*- */ 
+#include "ffitest.h" 
+#include <complex.h> 
+ 
+static _Complex T_C_TYPE return_c(_Complex T_C_TYPE c) 
+{ 
+  printf ("%f,%fi\n", T_CONV creal (c), T_CONV cimag (c)); 
+  return 2 * c; 
+} 
+int main (void) 
+{ 
+  ffi_cif cif; 
+  ffi_type *args[MAX_ARGS]; 
+  void *values[MAX_ARGS]; 
+  _Complex T_C_TYPE c, rc, rc2; 
+  T_C_TYPE cr, ci; 
+ 
+  args[0] = &T_FFI_TYPE; 
+  values[0] = &c; 
+ 
+  /* Initialize the cif */ 
+  CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 1, 
+		     &T_FFI_TYPE, args) == FFI_OK); 
+ 
+  for (cr = -127.0; cr <  127; cr++) 
+    { 
+      ci = 1000.0 - cr; 
+      c = cr + ci * I; 
+      ffi_call(&cif, FFI_FN(return_c), &rc, values); 
+      rc2 = return_c(c); 
+      printf ("%f,%fi vs %f,%fi\n", 
+	      T_CONV creal (rc), T_CONV cimag (rc), 
+	      T_CONV creal (rc2), T_CONV cimag (rc2)); 
+      CHECK(rc == 2 * c); 
+    } 
+  exit(0); 
+} 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1.inc b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1.inc
index 7cecc0fefa..fb29e31623 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1.inc
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1.inc
@@ -1,41 +1,41 @@
-/* -*-c-*- */
-#include "ffitest.h"
-#include <complex.h>
-
-static _Complex T_C_TYPE return_c(_Complex T_C_TYPE c1, float fl2, unsigned int in3, _Complex T_C_TYPE c4)
-{
-  return c1 + fl2 + in3 + c4;
-}
-int main (void)
-{
-  ffi_cif cif;
-  ffi_type *args[MAX_ARGS];
-  void *values[MAX_ARGS];
-  _Complex T_C_TYPE c1, c4, rc, rc2;
-  float fl2;
-  unsigned int in3;
-  args[0] = &T_FFI_TYPE;
-  args[1] = &ffi_type_float;
-  args[2] = &ffi_type_uint;
-  args[3] = &T_FFI_TYPE;
-  values[0] = &c1;
-  values[1] = &fl2;
-  values[2] = &in3;
-  values[3] = &c4;
-
-  /* Initialize the cif */
-  CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 4,
-		     &T_FFI_TYPE, args) == FFI_OK);
-  c1 = 127.0 + 255.0 * I;
-  fl2 = 128.0;
-  in3 = 255;
-  c4 = 512.7 + 1024.1 * I;
-
-  ffi_call(&cif, FFI_FN(return_c), &rc, values);
-  rc2 = return_c(c1, fl2, in3, c4);
-  printf ("%f,%fi vs %f,%fi\n",
-	  T_CONV creal (rc), T_CONV cimag (rc),
-	  T_CONV creal (rc2), T_CONV cimag (rc2));
-  CHECK(rc == rc2);
-  exit(0);
-}
+/* -*-c-*- */ 
+#include "ffitest.h" 
+#include <complex.h> 
+ 
+static _Complex T_C_TYPE return_c(_Complex T_C_TYPE c1, float fl2, unsigned int in3, _Complex T_C_TYPE c4) 
+{ 
+  return c1 + fl2 + in3 + c4; 
+} 
+int main (void) 
+{ 
+  ffi_cif cif; 
+  ffi_type *args[MAX_ARGS]; 
+  void *values[MAX_ARGS]; 
+  _Complex T_C_TYPE c1, c4, rc, rc2; 
+  float fl2; 
+  unsigned int in3; 
+  args[0] = &T_FFI_TYPE; 
+  args[1] = &ffi_type_float; 
+  args[2] = &ffi_type_uint; 
+  args[3] = &T_FFI_TYPE; 
+  values[0] = &c1; 
+  values[1] = &fl2; 
+  values[2] = &in3; 
+  values[3] = &c4; 
+ 
+  /* Initialize the cif */ 
+  CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 4, 
+		     &T_FFI_TYPE, args) == FFI_OK); 
+  c1 = 127.0 + 255.0 * I; 
+  fl2 = 128.0; 
+  in3 = 255; 
+  c4 = 512.7 + 1024.1 * I; 
+ 
+  ffi_call(&cif, FFI_FN(return_c), &rc, values); 
+  rc2 = return_c(c1, fl2, in3, c4); 
+  printf ("%f,%fi vs %f,%fi\n", 
+	  T_CONV creal (rc), T_CONV cimag (rc), 
+	  T_CONV creal (rc2), T_CONV cimag (rc2)); 
+  CHECK(rc == rc2); 
+  exit(0); 
+} 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1_double.c b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1_double.c
index 727410d563..9ddd9beb13 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1_double.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1_double.c
@@ -1,10 +1,10 @@
-/* Area:	ffi_call
-   Purpose:	Check return value complex.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_double.inc"
-#include "return_complex1.inc"
+/* Area:	ffi_call 
+   Purpose:	Check return value complex. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_double.inc" 
+#include "return_complex1.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1_double/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1_double/ya.make
index f3666626a6..6a8a1cce58 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1_double/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1_double/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    return_complex1_double.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    return_complex1_double.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1_float.c b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1_float.c
index a2aeada847..518502d0d8 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1_float.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1_float.c
@@ -1,10 +1,10 @@
-/* Area:	ffi_call
-   Purpose:	Check return value complex.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_float.inc"
-#include "return_complex1.inc"
+/* Area:	ffi_call 
+   Purpose:	Check return value complex. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_float.inc" 
+#include "return_complex1.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1_float/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1_float/ya.make
index 2f9ebac337..ad37e11a10 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1_float/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1_float/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    return_complex1_float.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    return_complex1_float.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1_longdouble.c b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1_longdouble.c
index 103504bf64..b6e7793094 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1_longdouble.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1_longdouble.c
@@ -1,10 +1,10 @@
-/* Area:	ffi_call
-   Purpose:	Check return value complex.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_longdouble.inc"
-#include "return_complex1.inc"
+/* Area:	ffi_call 
+   Purpose:	Check return value complex. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_longdouble.inc" 
+#include "return_complex1.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1_longdouble/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1_longdouble/ya.make
index e8ea56065b..6254737104 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1_longdouble/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex1_longdouble/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    return_complex1_longdouble.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    return_complex1_longdouble.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2.inc b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2.inc
index 265170bf71..1ab6d5bb15 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2.inc
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2.inc
@@ -1,44 +1,44 @@
-/* -*-c-*- */
-#include "ffitest.h"
-#include <complex.h>
-
-_Complex T_C_TYPE
-return_c(_Complex T_C_TYPE c1, _Complex T_C_TYPE c2,
-	 unsigned int in3, _Complex T_C_TYPE c4)
-{
-  volatile _Complex T_C_TYPE r = c1 + c2 + in3 + c4;
-  return r;
-}
-
-int main (void)
-{
-  ffi_cif cif;
-  ffi_type *args[MAX_ARGS];
-  void *values[MAX_ARGS];
-  _Complex T_C_TYPE c1, c2, c4, rc, rc2;
-  unsigned int in3;
-  args[0] = &T_FFI_TYPE;
-  args[1] = &T_FFI_TYPE;
-  args[2] = &ffi_type_uint;
-  args[3] = &T_FFI_TYPE;
-  values[0] = &c1;
-  values[1] = &c2;
-  values[2] = &in3;
-  values[3] = &c4;
-
-  /* Initialize the cif */
-  CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 4,
-		     &T_FFI_TYPE, args) == FFI_OK);
-  c1 = 127.0 + 255.0 * I;
-  c2 = 128.0 + 256.0;
-  in3 = 255;
-  c4 = 512.7 + 1024.1 * I;
-
-  ffi_call(&cif, FFI_FN(return_c), &rc, values);
-  rc2 = return_c(c1, c2, in3, c4);
-  printf ("%f,%fi vs %f,%fi\n",
-	  T_CONV creal (rc), T_CONV cimag (rc),
-	  T_CONV creal (rc2), T_CONV cimag (rc2));
-  CHECK(rc == rc2);
-  exit(0);
-}
+/* -*-c-*- */ 
+#include "ffitest.h" 
+#include <complex.h> 
+ 
+_Complex T_C_TYPE 
+return_c(_Complex T_C_TYPE c1, _Complex T_C_TYPE c2, 
+	 unsigned int in3, _Complex T_C_TYPE c4) 
+{ 
+  volatile _Complex T_C_TYPE r = c1 + c2 + in3 + c4; 
+  return r; 
+} 
+ 
+int main (void) 
+{ 
+  ffi_cif cif; 
+  ffi_type *args[MAX_ARGS]; 
+  void *values[MAX_ARGS]; 
+  _Complex T_C_TYPE c1, c2, c4, rc, rc2; 
+  unsigned int in3; 
+  args[0] = &T_FFI_TYPE; 
+  args[1] = &T_FFI_TYPE; 
+  args[2] = &ffi_type_uint; 
+  args[3] = &T_FFI_TYPE; 
+  values[0] = &c1; 
+  values[1] = &c2; 
+  values[2] = &in3; 
+  values[3] = &c4; 
+ 
+  /* Initialize the cif */ 
+  CHECK(ffi_prep_cif(&cif, FFI_DEFAULT_ABI, 4, 
+		     &T_FFI_TYPE, args) == FFI_OK); 
+  c1 = 127.0 + 255.0 * I; 
+  c2 = 128.0 + 256.0; 
+  in3 = 255; 
+  c4 = 512.7 + 1024.1 * I; 
+ 
+  ffi_call(&cif, FFI_FN(return_c), &rc, values); 
+  rc2 = return_c(c1, c2, in3, c4); 
+  printf ("%f,%fi vs %f,%fi\n", 
+	  T_CONV creal (rc), T_CONV cimag (rc), 
+	  T_CONV creal (rc2), T_CONV cimag (rc2)); 
+  CHECK(rc == rc2); 
+  exit(0); 
+} 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2_double.c b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2_double.c
index ab9efacb4a..48f266ae73 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2_double.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2_double.c
@@ -1,10 +1,10 @@
-/* Area:	ffi_call
-   Purpose:	Check return value complex.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_double.inc"
-#include "return_complex2.inc"
+/* Area:	ffi_call 
+   Purpose:	Check return value complex. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_double.inc" 
+#include "return_complex2.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2_double/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2_double/ya.make
index 08804ca850..802fb44076 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2_double/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2_double/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    return_complex2_double.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    return_complex2_double.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2_float.c b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2_float.c
index d7f22c2a0c..988e5ab395 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2_float.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2_float.c
@@ -1,10 +1,10 @@
-/* Area:	ffi_call
-   Purpose:	Check return value complex.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_float.inc"
-#include "return_complex2.inc"
+/* Area:	ffi_call 
+   Purpose:	Check return value complex. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_float.inc" 
+#include "return_complex2.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2_float/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2_float/ya.make
index 3fa5a7ebb1..25b3668c11 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2_float/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2_float/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    return_complex2_float.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    return_complex2_float.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2_longdouble.c b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2_longdouble.c
index 3edea629df..5ba8e277f6 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2_longdouble.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2_longdouble.c
@@ -1,10 +1,10 @@
-/* Area:	ffi_call
-   Purpose:	Check return value complex.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_longdouble.inc"
-#include "return_complex2.inc"
+/* Area:	ffi_call 
+   Purpose:	Check return value complex. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_longdouble.inc" 
+#include "return_complex2.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2_longdouble/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2_longdouble/ya.make
index 7104e84373..5a9d9b29a3 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2_longdouble/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex2_longdouble/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    return_complex2_longdouble.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    return_complex2_longdouble.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex_double.c b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex_double.c
index e2497cc84a..b9a0f56820 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex_double.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex_double.c
@@ -1,10 +1,10 @@
-/* Area:	ffi_call
-   Purpose:	Check return value complex.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_double.inc"
-#include "return_complex.inc"
+/* Area:	ffi_call 
+   Purpose:	Check return value complex. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_double.inc" 
+#include "return_complex.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex_double/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex_double/ya.make
index 19ccb8899b..6982692c50 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex_double/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex_double/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    return_complex_double.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    return_complex_double.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex_float.c b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex_float.c
index a35528ff93..762821e12d 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex_float.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex_float.c
@@ -1,10 +1,10 @@
-/* Area:	ffi_call
-   Purpose:	Check return value complex.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_float.inc"
-#include "return_complex.inc"
+/* Area:	ffi_call 
+   Purpose:	Check return value complex. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_float.inc" 
+#include "return_complex.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex_float/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex_float/ya.make
index cbe2235218..0871392666 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex_float/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex_float/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    return_complex_float.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    return_complex_float.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex_longdouble.c b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex_longdouble.c
index 142d7becba..b0539ff09d 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex_longdouble.c
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex_longdouble.c
@@ -1,10 +1,10 @@
-/* Area:	ffi_call
-   Purpose:	Check return value complex.
-   Limitations:	none.
-   PR:		none.
-   Originator:	<vogt@linux.vnet.ibm.com>.  */
-
-/* { dg-do run } */
-
-#include "complex_defs_longdouble.inc"
-#include "return_complex.inc"
+/* Area:	ffi_call 
+   Purpose:	Check return value complex. 
+   Limitations:	none. 
+   PR:		none. 
+   Originator:	<vogt@linux.vnet.ibm.com>.  */ 
+ 
+/* { dg-do run } */ 
+ 
+#include "complex_defs_longdouble.inc" 
+#include "return_complex.inc" 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex_longdouble/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex_longdouble/ya.make
index a689752038..ac3b3c71f8 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/return_complex_longdouble/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/return_complex_longdouble/ya.make
@@ -1,9 +1,9 @@
-# Generated by devtools/yamaker.
-
-PROGRAM()
-
+# Generated by devtools/yamaker. 
+ 
+PROGRAM() 
+ 
 WITHOUT_LICENSE_TEXTS()
-
+ 
 OWNER(
     borman
     g:cpp-contrib
@@ -11,18 +11,18 @@ OWNER(
 
 LICENSE(GPL-2.0-only)
 
-PEERDIR(
-    contrib/restricted/libffi
-)
-
-NO_COMPILER_WARNINGS()
-
-NO_RUNTIME()
-
-SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex)
-
-SRCS(
-    return_complex_longdouble.c
-)
-
-END()
+PEERDIR( 
+    contrib/restricted/libffi 
+) 
+ 
+NO_COMPILER_WARNINGS() 
+ 
+NO_RUNTIME() 
+ 
+SRCDIR(contrib/restricted/libffi/testsuite/libffi.complex) 
+ 
+SRCS( 
+    return_complex_longdouble.c 
+) 
+ 
+END() 
diff --git a/contrib/restricted/libffi/testsuite/libffi.complex/ya.make b/contrib/restricted/libffi/testsuite/libffi.complex/ya.make
index 032d03839a..02036190d0 100644
--- a/contrib/restricted/libffi/testsuite/libffi.complex/ya.make
+++ b/contrib/restricted/libffi/testsuite/libffi.complex/ya.make
@@ -1,32 +1,32 @@
-# Generated by devtools/yamaker.
-
-RECURSE(
-    cls_align_complex_double
-    cls_align_complex_float
-    cls_align_complex_longdouble
-    cls_complex_double
-    cls_complex_float
-    cls_complex_longdouble
-    cls_complex_struct_double
-    cls_complex_struct_float
-    cls_complex_struct_longdouble
-    cls_complex_va_double
-    cls_complex_va_float
-    cls_complex_va_longdouble
-    complex_double
-    complex_float
-    complex_int
-    complex_longdouble
-    many_complex_double
-    many_complex_float
-    many_complex_longdouble
-    return_complex1_double
-    return_complex1_float
-    return_complex1_longdouble
-    return_complex2_double
-    return_complex2_float
-    return_complex2_longdouble
-    return_complex_double
-    return_complex_float
-    return_complex_longdouble
-)
+# Generated by devtools/yamaker. 
+ 
+RECURSE( 
+    cls_align_complex_double 
+    cls_align_complex_float 
+    cls_align_complex_longdouble 
+    cls_complex_double 
+    cls_complex_float 
+    cls_complex_longdouble 
+    cls_complex_struct_double 
+    cls_complex_struct_float 
+    cls_complex_struct_longdouble 
+    cls_complex_va_double 
+    cls_complex_va_float 
+    cls_complex_va_longdouble 
+    complex_double 
+    complex_float 
+    complex_int 
+    complex_longdouble 
+    many_complex_double 
+    many_complex_float 
+    many_complex_longdouble 
+    return_complex1_double 
+    return_complex1_float 
+    return_complex1_longdouble 
+    return_complex2_double 
+    return_complex2_float 
+    return_complex2_longdouble 
+    return_complex_double 
+    return_complex_float 
+    return_complex_longdouble 
+)