URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [tags/] [or1ksim/] [or1ksim-0.5.0rc2/] [testsuite/] [test-code-or1k/] [mul/] [mul.c] - Rev 757
Go to most recent revision | Compare with Previous | Blame | View Log
/* exit.c. Test of Or1ksim program multiplication instructions Copyright (C) 1999-2006 OpenCores Copyright (C) 2010 Embecosm Limited Contributors various OpenCores participants Contributor Jeremy Bennett <jeremy.bennett@embecosm.com> This file is part of OpenRISC 1000 Architectural Simulator. This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 3 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see <http: www.gnu.org/licenses/>. */ /* ---------------------------------------------------------------------------- This code is commented throughout for use with Doxygen. --------------------------------------------------------------------------*/ /* Test l.mul, l.mac and l.macrc instructions */ #include "support.h" #define T1 0xa6312f33 #define T2 0x059b8f08 #define T3 0x00000000 #define MAC(x,y) asm volatile ("l.mac\t%0,%1" : : "r" (x), "r" (y)) #define MACRC macrc() static inline long macrc() { long x; asm volatile ("l.macrc\t%0" : "=r" (x)); return x; } long test_mul (long a, long b) { long t; int i; for (i = 0; i < 100; i++) { t = a * b; t += 153; a = t - a * 17; b = t + b * 13333; /*printf ("(%08x,%08x)", a, b);*/ } return a; } long test_mac (long a, long b) { long t = 1234567; int i; for (i = 0; i < 100; i++) { MAC (a, b); if (i & 3) { a = t - a; b = t + a; } else { a = MACRC; } MAC (a, 3); MAC (a, 5); MAC (a, 7); //printf ("(%08x,%08x)", a, b); } return a; } long test_mul_mac (long a, long b) { long t = 1; int i; for (i = 0; i < 100; i++) { a = a * 119; MAC (a, b); MAC (b, 423490431); MAC (b, 113); MAC (a, 997); b = 87 * a * t; if (i & 3) { t = a * b; a = t - a; b = t + a; } else { a = MACRC; } // printf ("(%08x,%08x)", a, b); } return a; } int main () { unsigned t1; unsigned t2; unsigned t3; printf ("%08lx\n", MACRC); MAC (888888887, 0x87654321); printf ("%08lx\n", MACRC); t1 = test_mul (888888887, 0x87654321); t2 = test_mac (888888887, 0x87654321); t3 = test_mul_mac (888888887, 0x87654321); printf ("%08x, expected %08x\n", t1, T1); printf ("%08x, expected %08x\n", t2, T2); printf ("%08x, expected %08x\n", t3, T3); report (t1 ^ t2 ^ t3 ^ T1 ^ T2 ^ T3 ^ 0xdeaddead); if (t1 != T1 || t2 != T2 || t3 != T3) { printf ("Test failed!\n"); if (t1 != T1) exit (1); if (t2 != T2) exit (2); if (t3 != T3) exit (3); } else { printf ("Test succesful.\n"); exit (0); } exit (0); }
Go to most recent revision | Compare with Previous | Blame | View Log