xref: /freebsd/cddl/contrib/opensolaris/cmd/dtrace/test/tst/common/scalars/tst.16kglobal.d (revision 27067774dce3388702a4cf744d7096c6fb71b688)
1 /*
2  * This file and its contents are supplied under the terms of the
3  * Common Development and Distribution License ("CDDL"), version 1.0.
4  * You may only use this file in accordance with the terms of version
5  * 1.0 of the CDDL.
6  *
7  * A full copy of the text of the CDDL should have accompanied this
8  * source.  A copy of the CDDL is also available via the Internet at
9  * http://www.illumos.org/license/CDDL.
10  */
11 
12 /*
13  * Copyright (c) 2016, Joyent, Inc. All rights reserved.
14  */
15 
16 #pragma D option strsize=16k
17 
18 char *k;
19 
20 BEGIN
21 {
22 	j = probeprov;
23 	k = j;
24 	k[0] = 'D';
25 	k[1] = 'T';
26 }
27 
28 BEGIN
29 {
30 	trace(stringof(k));
31 	exit(k == "DTrace" ? 0 : 1);
32 }
33