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 die = "Die"; 32 tap = ", SystemTap, "; 33 the = "The"; 34 } 35 36 BEGIN 37 { 38 phrase = strjoin(die, tap); 39 phrase = strjoin(phrase, die); 40 expected = "Die, SystemTap, Die"; 41 } 42 43 BEGIN 44 /phrase != expected/ 45 { 46 printf("global: expected '%s', found '%s'\n", expected, phrase); 47 exit(1); 48 } 49 50 BEGIN 51 { 52 this->phrase = strjoin(the, tap); 53 } 54 55 BEGIN 56 { 57 this->phrase = strjoin(this->phrase, the); 58 expected = "The, SystemTap, The"; 59 } 60 61 BEGIN 62 /this->phrase != expected/ 63 { 64 printf("clause-local: expected '%s', found '%s'\n", 65 expected, this->phrase); 66 exit(2); 67 } 68 69 BEGIN 70 { 71 phrase = NULL; 72 this->phrase = NULL; 73 } 74 75 BEGIN 76 /phrase != NULL/ 77 { 78 printf("expected global to be NULL\n"); 79 exit(3); 80 } 81 82 BEGIN 83 /this->phrase != NULL/ 84 { 85 printf("expected clause-local to be NULL\n"); 86 exit(4); 87 } 88 89 BEGIN 90 { 91 exit(0); 92 } 93