1 /*
2  * CDDL HEADER START
3  *
4  * The contents of this file are subject to the terms of the
5  * Common Development and Distribution License (the "License").
6  * You may not use this file except in compliance with the License.
7  *
8  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9  * or http://www.opensolaris.org/os/licensing.
10  * See the License for the specific language governing permissions
11  * and limitations under the License.
12  *
13  * When distributing Covered Code, include this CDDL HEADER in each
14  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15  * If applicable, add the following below this CDDL HEADER, with the
16  * fields enclosed by brackets "[]" replaced with your own identifying
17  * information: Portions Copyright [yyyy] [name of copyright owner]
18  *
19  * CDDL HEADER END
20  */
21 
22 /*
23  * Copyright 2006 Sun Microsystems, Inc.  All rights reserved.
24  * Use is subject to license terms.
25  */
26 
27 #pragma D option quiet
28 
29 BEGIN
30 {
31 	@[8] = sum(1);
32 	@[6] = sum(1);
33 	@[7] = sum(1);
34 	@[5] = sum(1);
35 	@[3] = sum(1);
36 	@[0] = sum(1);
37 	@[9] = sum(1);
38 
39 	@tour["Ghent"] = sum(1);
40 	@tour["Berlin"] = sum(1);
41 	@tour["London"] = sum(1);
42 	@tour["Dublin"] = sum(1);
43 	@tour["Shanghai"] = sum(1);
44 	@tour["Zurich"] = sum(1);
45 	@tour["Regina"] = sum(1);
46 	@tour["Winnipeg"] = sum(1);
47 	@tour["Edmonton"] = sum(1);
48 	@tour["Calgary"] = sum(1);
49 
50 	@ate[8, "Rice"] = sum(1);
51 	@ate[8, "Oatmeal"] = sum(1);
52 	@ate[8, "Barley"] = sum(1);
53 	@ate[8, "Carrots"] = sum(1);
54 	@ate[8, "Sweet potato"] = sum(1);
55 	@ate[8, "Asparagus"] = sum(1);
56 	@ate[8, "Squash"] = sum(1);
57 
58 	@chars['a'] = sum(1);
59 	@chars['s'] = sum(1);
60 	@chars['d'] = sum(1);
61 	@chars['f'] = sum(1);
62 
63 	printa("%d\n", @);
64 	printf("\n");
65 
66 	printa("%s\n", @tour);
67 	printf("\n");
68 
69 	printa("%d %s\n", @ate);
70 	printf("\n");
71 
72 	printa("%c\n", @chars);
73 	printf("\n");
74 
75 	exit(0);
76 }
77