1178476Sjb/* 2178476Sjb * CDDL HEADER START 3178476Sjb * 4178476Sjb * The contents of this file are subject to the terms of the 5178476Sjb * Common Development and Distribution License (the "License"). 6178476Sjb * You may not use this file except in compliance with the License. 7178476Sjb * 8178476Sjb * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 9178476Sjb * or http://www.opensolaris.org/os/licensing. 10178476Sjb * See the License for the specific language governing permissions 11178476Sjb * and limitations under the License. 12178476Sjb * 13178476Sjb * When distributing Covered Code, include this CDDL HEADER in each 14178476Sjb * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 15178476Sjb * If applicable, add the following below this CDDL HEADER, with the 16178476Sjb * fields enclosed by brackets "[]" replaced with your own identifying 17178476Sjb * information: Portions Copyright [yyyy] [name of copyright owner] 18178476Sjb * 19178476Sjb * CDDL HEADER END 20178476Sjb */ 21178476Sjb 22178476Sjb/* 23178476Sjb * Copyright 2008 Sun Microsystems, Inc. All rights reserved. 24178476Sjb * Use is subject to license terms. 25178476Sjb */ 26178476Sjb 27178476Sjb#pragma ident "%Z%%M% %I% %E% SMI" 28178476Sjb 29178476Sjb#pragma D option quiet 30178476Sjb#pragma D option aggsortkey 31178476Sjb 32178476Sjb/* 33178476Sjb * This is to check that we're correctly null-terminating the result of the 34178476Sjb * substr() subroutine. 35178476Sjb */ 36178476Sjb 37178476Sjbtick-1ms 38178476Sjb/i++ > 1000/ 39178476Sjb{ 40178476Sjb exit(0); 41178476Sjb} 42178476Sjb 43178476Sjbtick-1ms 44178476Sjb{ 45178476Sjb @[substr((i & 1) ? "Bryan is smart" : "he's not a dummy", 0, 46178476Sjb (i & 1) ? 8 : 18)] = count(); 47178476Sjb} 48178476Sjb 49178476SjbEND 50178476Sjb{ 51178476Sjb printa("%s\n", @); 52178476Sjb} 53