tst.order.d revision 178477
1221345Sdim/*
2218885Sdim * CDDL HEADER START
3218885Sdim *
4218885Sdim * The contents of this file are subject to the terms of the
5218885Sdim * Common Development and Distribution License (the "License").
6218885Sdim * You may not use this file except in compliance with the License.
7218885Sdim *
8218885Sdim * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9218885Sdim * or http://www.opensolaris.org/os/licensing.
10218885Sdim * See the License for the specific language governing permissions
11218885Sdim * and limitations under the License.
12218885Sdim *
13218885Sdim * When distributing Covered Code, include this CDDL HEADER in each
14218885Sdim * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15218885Sdim * If applicable, add the following below this CDDL HEADER, with the
16218885Sdim * fields enclosed by brackets "[]" replaced with your own identifying
17249423Sdim * information: Portions Copyright [yyyy] [name of copyright owner]
18249423Sdim *
19218885Sdim * CDDL HEADER END
20243830Sdim */
21243830Sdim
22218885Sdim/*
23218885Sdim * Copyright 2006 Sun Microsystems, Inc.  All rights reserved.
24218885Sdim * Use is subject to license terms.
25218885Sdim */
26218885Sdim
27218885Sdim#pragma ident	"%Z%%M%	%I%	%E% SMI"
28218885Sdim
29218885Sdim#pragma D option quiet
30218885Sdim
31218885SdimBEGIN
32218885Sdim{
33218885Sdim	@[8] = sum(1);
34218885Sdim	@[6] = sum(1);
35218885Sdim	@[7] = sum(1);
36218885Sdim	@[5] = sum(1);
37218885Sdim	@[3] = sum(1);
38218885Sdim	@[0] = sum(1);
39218885Sdim	@[9] = sum(1);
40218885Sdim
41218885Sdim	@tour["Ghent"] = sum(1);
42218885Sdim	@tour["Berlin"] = sum(1);
43218885Sdim	@tour["London"] = sum(1);
44218885Sdim	@tour["Dublin"] = sum(1);
45218885Sdim	@tour["Shanghai"] = sum(1);
46218885Sdim	@tour["Zurich"] = sum(1);
47218885Sdim	@tour["Regina"] = sum(1);
48218885Sdim	@tour["Winnipeg"] = sum(1);
49218885Sdim	@tour["Edmonton"] = sum(1);
50218885Sdim	@tour["Calgary"] = sum(1);
51218885Sdim
52218885Sdim	@ate[8, "Rice"] = sum(1);
53218885Sdim	@ate[8, "Oatmeal"] = sum(1);
54218885Sdim	@ate[8, "Barley"] = sum(1);
55218885Sdim	@ate[8, "Carrots"] = sum(1);
56218885Sdim	@ate[8, "Sweet potato"] = sum(1);
57218885Sdim	@ate[8, "Asparagus"] = sum(1);
58218885Sdim	@ate[8, "Squash"] = sum(1);
59218885Sdim
60218885Sdim	@chars['a'] = sum(1);
61218885Sdim	@chars['s'] = sum(1);
62218885Sdim	@chars['d'] = sum(1);
63218885Sdim	@chars['f'] = sum(1);
64218885Sdim
65218885Sdim	printa("%d\n", @);
66218885Sdim	printf("\n");
67218885Sdim
68218885Sdim	printa("%s\n", @tour);
69218885Sdim	printf("\n");
70218885Sdim
71218885Sdim	printa("%d %s\n", @ate);
72218885Sdim	printf("\n");
73218885Sdim
74218885Sdim	printa("%c\n", @chars);
75218885Sdim	printf("\n");
76218885Sdim
77218885Sdim	exit(0);
78218885Sdim}
79218885Sdim