OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [or1ksim/] [testsuite/] [test-code-or1k/] [dhry/] [dhry.c] - Diff between revs 90 and 458

Go to most recent revision | Show entire file | Details | Blame | View Log

Rev 90 Rev 458
Line 182... Line 182...
        Begin_Time = read_timer();
        Begin_Time = read_timer();
 
 
  for (Run_Index = 1; Run_Index <= Number_Of_Runs; ++Run_Index)
  for (Run_Index = 1; Run_Index <= Number_Of_Runs; ++Run_Index)
  {
  {
 
 
#if DBG
 
        report(1);
 
        report(Run_Index);
 
#endif
 
    Proc_5();
    Proc_5();
#if DBG
 
        report(2);
 
#endif
 
    Proc_4();
    Proc_4();
#if DBG
 
        report(3);
 
#endif
 
      /* Ch_1_Glob == 'A', Ch_2_Glob == 'B', Bool_Glob == true */
      /* Ch_1_Glob == 'A', Ch_2_Glob == 'B', Bool_Glob == true */
    Int_1_Loc = 2;
    Int_1_Loc = 2;
    Int_2_Loc = 3;
    Int_2_Loc = 3;
    strcpy (Str_2_Loc, "DHRYSTONE PROGRAM, 2'ND STRING");
    strcpy (Str_2_Loc, "DHRYSTONE PROGRAM, 2'ND STRING");
    Enum_Loc = Ident_2;
    Enum_Loc = Ident_2;
#if DBG
 
        report(0x31);
 
        report((unsigned long)Str_1_Loc);
 
        report((unsigned long)Str_2_Loc);
 
#endif
 
 
 
    Bool_Glob = ! Func_2 (Str_1_Loc, Str_2_Loc);
    Bool_Glob = ! Func_2 (Str_1_Loc, Str_2_Loc);
 
 
      /* Bool_Glob == 1 */
      /* Bool_Glob == 1 */
#if DBG
 
        report(4);
 
#endif
 
    while (Int_1_Loc < Int_2_Loc)  /* loop body executed once */
    while (Int_1_Loc < Int_2_Loc)  /* loop body executed once */
    {
    {
      Int_3_Loc = 5 * Int_1_Loc - Int_2_Loc;
      Int_3_Loc = 5 * Int_1_Loc - Int_2_Loc;
        /* Int_3_Loc == 7 */
        /* Int_3_Loc == 7 */
      Proc_7 (Int_1_Loc, Int_2_Loc, &Int_3_Loc);
      Proc_7 (Int_1_Loc, Int_2_Loc, &Int_3_Loc);
        /* Int_3_Loc == 7 */
        /* Int_3_Loc == 7 */
      Int_1_Loc += 1;
      Int_1_Loc += 1;
    } /* while */
    } /* while */
#if DBG
 
        report(5);
 
#endif
 
      /* Int_1_Loc == 3, Int_2_Loc == 3, Int_3_Loc == 7 */
      /* Int_1_Loc == 3, Int_2_Loc == 3, Int_3_Loc == 7 */
#if DBG
 
      printf("a) Int_1_Loc: %x\n", Int_1_Loc);
 
      printf("a) Int_2_Loc: %x\n", Int_2_Loc);
 
      printf("a) Int_3_Loc: %x\n\n", Int_3_Loc);
 
#endif
 
    Proc_8 (Arr_1_Glob, Arr_2_Glob, Int_1_Loc, Int_3_Loc);
    Proc_8 (Arr_1_Glob, Arr_2_Glob, Int_1_Loc, Int_3_Loc);
      /* Int_Glob == 5 */
      /* Int_Glob == 5 */
#if DBG
 
      printf("b) Int_1_Loc: %x\n", Int_1_Loc);
 
      printf("b) Int_2_Loc: %x\n", Int_2_Loc);
 
      printf("b) Int_3_Loc: %x\n\n", Int_3_Loc);
 
        report(6);
 
#endif
 
 
 
    Proc_1 (Ptr_Glob);
    Proc_1 (Ptr_Glob);
#if DBG
 
      printf("c) Int_1_Loc: %x\n", Int_1_Loc);
 
      printf("c) Int_2_Loc: %x\n", Int_2_Loc);
 
      printf("c) Int_3_Loc: %x\n\n", Int_3_Loc);
 
        report(7);
 
#endif
 
 
 
    for (Ch_Index = 'A'; Ch_Index <= Ch_2_Glob; ++Ch_Index)
    for (Ch_Index = 'A'; Ch_Index <= Ch_2_Glob; ++Ch_Index)
                             /* loop body executed twice */
                             /* loop body executed twice */
    {
    {
      if (Enum_Loc == Func_1 (Ch_Index, 'C'))
      if (Enum_Loc == Func_1 (Ch_Index, 'C'))
Line 254... Line 220...
        {
        {
        Proc_6 (Ident_1, &Enum_Loc);
        Proc_6 (Ident_1, &Enum_Loc);
        strcpy (Str_2_Loc, "DHRYSTONE PROGRAM, 3'RD STRING");
        strcpy (Str_2_Loc, "DHRYSTONE PROGRAM, 3'RD STRING");
        Int_2_Loc = Run_Index;
        Int_2_Loc = Run_Index;
        Int_Glob = Run_Index;
        Int_Glob = Run_Index;
#if DBG
 
      printf("d) Int_1_Loc: %x\n", Int_1_Loc);
 
      printf("d) Int_2_Loc: %x\n", Int_2_Loc);
 
      printf("d) Int_3_Loc: %x\n\n", Int_3_Loc);
 
#endif
 
        }
        }
    }
    }
#if DBG
 
        report(8);
 
#endif
 
 
 
      /* Int_1_Loc == 3, Int_2_Loc == 3, Int_3_Loc == 7 */
      /* Int_1_Loc == 3, Int_2_Loc == 3, Int_3_Loc == 7 */
#if DBG
 
      printf("e) Int_1_Loc: %x\n", Int_1_Loc);
 
      printf("e) Int_2_Loc: %x\n", Int_2_Loc);
 
      printf("e) Int_3_Loc: %x\n", Int_3_Loc);
 
      printf("e) Ch_1_Glob: %c\n\n", Ch_1_Glob);
 
#endif
 
    Int_2_Loc = Int_2_Loc * Int_1_Loc;
    Int_2_Loc = Int_2_Loc * Int_1_Loc;
    Int_1_Loc = Int_2_Loc / Int_3_Loc;
    Int_1_Loc = Int_2_Loc / Int_3_Loc;
    Int_2_Loc = 7 * (Int_2_Loc - Int_3_Loc) - Int_1_Loc;
    Int_2_Loc = 7 * (Int_2_Loc - Int_3_Loc) - Int_1_Loc;
      /* Int_1_Loc == 1, Int_2_Loc == 13, Int_3_Loc == 7 */
      /* Int_1_Loc == 1, Int_2_Loc == 13, Int_3_Loc == 7 */
    Proc_2 (&Int_1_Loc);
    Proc_2 (&Int_1_Loc);
#if DBG
 
        report(9);
 
#endif
 
 
 
      /* Int_1_Loc == 5 */
      /* Int_1_Loc == 5 */
#if DBG
 
      printf("f) Int_1_Loc: %x\n", Int_1_Loc);
 
      printf("f) Int_2_Loc: %x\n", Int_2_Loc);
 
      printf("f) Int_3_Loc: %x\n\n", Int_3_Loc);
 
#endif
 
 
 
  } /* loop "for Run_Index" */
  } /* loop "for Run_Index" */
 
 
  /**************/
  /**************/
  /* Stop timer */
  /* Stop timer */

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.