File: add_shift.S

package info (click to toggle)
gdb-doc 13.1-1
  • links: PTS, VCS
  • area: non-free
  • in suites: bookworm
  • size: 234,284 kB
  • sloc: ansic: 1,988,072; asm: 373,465; exp: 187,579; cpp: 75,697; makefile: 69,432; sh: 24,829; yacc: 11,654; python: 9,602; ada: 6,680; xml: 6,073; perl: 5,077; pascal: 3,357; f90: 2,555; tcl: 1,902; lisp: 1,578; cs: 879; lex: 759; sed: 228; awk: 154; objc: 137; fortran: 57
file content (53 lines) | stat: -rw-r--r-- 796 bytes parent folder | download | duplicates (33) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
 
// ACP 5.6 Flags for dreg=(dreg+dreg)<<1,2
# mach: bfin

#include "test.h"
.include "testutils.inc"
	start


	r1=0;
	ASTAT = R1;
	r2=0;
	r2.h=0x4000;
	r2=(r2+r1)<<2;
	dbga (r2.l,0x0);
	dbga (r2.h,0x0);
	_dbg ASTAT;
	r7=ASTAT;
	CHECKREG R7, (_VS|_V|_V_COPY|_AZ)

	r2=0;
	r2.h=0x4000;
	r2=(r2+r1)<<1;
	dbga (r2.l,0x0);
	dbga (r2.h,0x8000);
	_dbg ASTAT;
	r7=ASTAT;
	CHECKREG R7, (_VS|_V|_V_COPY|_AN)

	r1=0;
	r1.h=0xd300;
	r2=0;
	r2.h=0xb700;
	r2=(r2+r1)<<1;
	dbga (r2.l,0x0);
	dbga (r2.h,0x1400);
	_dbg ASTAT;
	r7=ASTAT;
	CHECKREG R7, (_VS|_V|_V_COPY)

	r0 = 1;
	r0 <<= 31;	// r0 should be 0x80000000
	r7 = 0;
	ASTAT = r7;
	_dbg r0;
	r1 = r0;
	_dbg r1;
	r1 = (r1 + r0) << 1;	// add overflows to zero, no shift overflow
	_dbg r1;
	_dbg ASTAT;
	r7 = ASTAT;
	CHECKREG R7, (_VS|_V|_V_COPY|_AZ);

	pass