/* { dg-do compile } */
/* { dg-options "-O3 -mno-branch-predictions -mbranch-predictions-threshold=60 -mcpu=970" } */

#include <stdio.h>
int 
main (int argc, char **argv) 
{

     int DIM1 = 2;
     int DIM2 = 3;
     int DIM3 = 2;

     char M[2][3] = { { 'a' , 'b', 'c' },
		      { 'd' , 'e', 'f' }  };

     char N[3][2] = { { 'g' , 'h' } ,
		      { 'i' , 'j' } ,
		      { 'k' , 'l' }   };


     char P[DIM1][DIM3][20];
     int  R[DIM1][DIM3];

     char tmp_string[4];
     char *tmp_string2 = (char *) malloc(20*sizeof(char));
     int a, b, c;

     int do_as_numbers;
     char tempc;

     printf ("Would you rather have the matrix data treated as characters?");
     tempc = fgetc(stdin);

     if ((tempc == 'Y') || (tempc == 'y')) 
       do_as_numbers = 0;
     else
       do_as_numbers = 1;
     

     if (do_as_numbers) {
       
       for (a=0; a < DIM1; a++) 
	 for (b=0; b < DIM3; b++)
	   R[a][b] = 0;

     } else {

       /* Initialize P: Allocate space for the strings; initialize them to
	  empty string */

       fprintf (stdout, "Initializing character result matrix.\n");
       
       for (a=0; a<DIM1; a++)
	 for (b=0;b<DIM3; b++) {
	   P[a][b][0] = '\0';
	 }

     }

     /* Perform the actual "multiply" */

     if (do_as_numbers) {

       for (a=0; a < DIM1; a++) {
	 for (b=0; b < DIM3; b++) {
	   for (c=0; c < DIM2; c++) {
	     R[a][b] = R[a][b] + ((int)M[a][c] * (int)N[c][b]);
	   }
	 }
       }

     } else { 

       fprintf (stdout, "'Multiplying' character matrices.\n");

       for (a = 0 ; a < DIM1 ; a ++) {
	 for (b = 0; b < DIM3; b++) {
	   for (c = 0; c < DIM2; c++) {
	 
	     /* examples of tmp_string: 'ag+\0'  'bi+\0' 'cl\0'  */
	 
	     tmp_string[0] = M[a][c];
	     tmp_string[1] = N[c][b];
	     if (c != 2) {
	       tmp_string[2] = '+';
	       tmp_string[3] = '\0';
	     }else 
	       tmp_string[2] = '\0';
	     
	     strcat(P[a][b], tmp_string);
	 
	   }
	 }
       }

     }


     /* Print out results */

     printf ("First array:\n");
     
     if (do_as_numbers) {

       for (a=0; a <DIM1; a++) {
	 for (b=0; b < DIM2; b++) 
	   printf (" %d ", (int)M[a][b]);
	 printf("\n");
       }

     } else {

       fprintf (stdout, "Printing out first character matrix.\n");
       
       for (a=0; a < DIM1;a++) {
	 for (b=0; b < DIM2; b++) 
	   printf (" %c ",M[a][b]);
	 printf("\n");
       }

     }
       
     printf ("\nSecond array:\n");
     
     if (do_as_numbers) {

       for (a=0; a < DIM2; a++) {
	 for (b=0; b < DIM3; b++) 
	   printf (" %d ", (int)N[a][b]);
	 printf("\n");
       }

     } else {

       fprintf (stdout, "Printing out second character matrix.\n");

       for (a=0; a < DIM2; a++) {
	 for (b=0; b < DIM3; b++) 
	   printf (" %c ",N[a][b]);
	 printf("\n");
       }
       
     }

     printf ("\nResults:\n");
     
     if (do_as_numbers) {
       
       for (a=0; a < DIM1; a++) {
	 for (b=0; b < DIM3; b++)
	   printf (" %d ", R[a][b]);
	 printf ("\n");
       }

     } else {

       fprintf (stdout, "Printing out result character matrix.\n");

       for (a=0; a<DIM1; a++) {
	 for (b=0; b<DIM3; b++) 
	   printf (" %s ",P[a][b]);
	 printf("\n");
       }

     }
}

void foo (int count, char* pca, char* pcb) {
    int i;
    if (count > 10)
        for (i = 0; i < count; ++i)
            pcb += i;
    else
        for (i = 0; i < count; ++i)
            pca += i;
    *pca = *pcb;
}

/* { dg-final { scan-assembler-not "bdnz\\+\\+" } } */
/* { dg-final { scan-assembler-not "bne\\+" } } */
/* { dg-final { scan-assembler-not "bge-" } } */