File: tst.BasicUnsigned.d

package info (click to toggle)
dtrace 2.0.5-1
  • links: PTS
  • area: main
  • in suites: sid
  • size: 24,408 kB
  • sloc: ansic: 61,247; sh: 17,997; asm: 1,717; lex: 947; awk: 754; yacc: 695; perl: 37; sed: 17; makefile: 15
file content (54 lines) | stat: -rw-r--r-- 1,090 bytes parent folder | download
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
54
/*
 * Oracle Linux DTrace.
 * Copyright (c) 2021, Oracle and/or its affiliates. All rights reserved.
 * Licensed under the Universal Permissive License v 1.0 as shown at
 * http://oss.oracle.com/licenses/upl.
 */

/*
 * ASSERTION: Bit-field store and load work properly.
 *
 * SECTION: Structs and Unions/Bit-Fields
 */

#pragma D option quiet

struct bitRecord{
	unsigned int  a : 3;
	unsigned int  b : 7;
	unsigned int  c : 14;
	unsigned long d : 35;
	unsigned int  e : 22;
	unsigned int  f : 32;
	unsigned int  g : 16;
	unsigned int  h : 8;
} var;

BEGIN
{
	/* sign bit is 0 */
	var.a = 3;
	var.b = 0x3f;
	var.c = 0x1fff;
	var.d = 0x3ffffffff;
	var.e = 0x1fffff;
	var.f = 0x7fffffff;
	var.g = 0x7fff;
	var.h = 0x7f;
	printf("%d %d %d %d %d %d %d %d\n",
	    var.a, var.b, var.c, var.d, var.e, var.f, var.g, var.h);

	/* sign bit is 1 */
	var.a = 7;
	var.b = 0x75;
	var.c = 0x3555;
	var.d = 0x755555555;
	var.e = 0x355555;
	var.f = 0xf5555555;
	var.g = 0xf555;
	var.h = 0xf5;
	printf("%d %d %d %d %d %d %d %d\n",
	    var.a, var.b, var.c, var.d, var.e, var.f, var.g, var.h);

	exit(0);
}