OSDN Git Service

gcc/fortran/
[pf3gnuchains/gcc-fork.git] / libgfortran / generated / minloc0_8_i8.c
index 87d6705..00a7dfe 100644 (file)
@@ -28,11 +28,11 @@ Boston, MA 02111-1307, USA.  */
 
 
 
-extern void __minloc0_8_i8 (gfc_array_i8 * retarray, gfc_array_i8 *array);
-export_proto_np(__minloc0_8_i8);
+extern void minloc0_8_i8 (gfc_array_i8 * retarray, gfc_array_i8 *array);
+export_proto(minloc0_8_i8);
 
 void
-__minloc0_8_i8 (gfc_array_i8 * retarray, gfc_array_i8 *array)
+minloc0_8_i8 (gfc_array_i8 * retarray, gfc_array_i8 *array)
 {
   index_type count[GFC_MAX_DIMENSIONS];
   index_type extent[GFC_MAX_DIMENSIONS];
@@ -122,11 +122,12 @@ __minloc0_8_i8 (gfc_array_i8 * retarray, gfc_array_i8 *array)
 }
 
 
-extern void __mminloc0_8_i8 (gfc_array_i8 *, gfc_array_i8 *, gfc_array_l4 *);
-export_proto_np(__mminloc0_8_i8);
+extern void mminloc0_8_i8 (gfc_array_i8 *, gfc_array_i8 *, gfc_array_l4 *);
+export_proto(mminloc0_8_i8);
 
 void
-__mminloc0_8_i8 (gfc_array_i8 * retarray, gfc_array_i8 *array, gfc_array_l4 * mask)
+mminloc0_8_i8 (gfc_array_i8 * retarray, gfc_array_i8 *array,
+                                 gfc_array_l4 * mask)
 {
   index_type count[GFC_MAX_DIMENSIONS];
   index_type extent[GFC_MAX_DIMENSIONS];