tst.lquantize.d revision 178476
1219019Sgabor/* 2219019Sgabor * CDDL HEADER START 3219019Sgabor * 4219019Sgabor * The contents of this file are subject to the terms of the 5219019Sgabor * Common Development and Distribution License (the "License"). 6219019Sgabor * You may not use this file except in compliance with the License. 7219019Sgabor * 8219019Sgabor * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 9219019Sgabor * or http://www.opensolaris.org/os/licensing. 10219019Sgabor * See the License for the specific language governing permissions 11219019Sgabor * and limitations under the License. 12219019Sgabor * 13219019Sgabor * When distributing Covered Code, include this CDDL HEADER in each 14219019Sgabor * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 15219019Sgabor * If applicable, add the following below this CDDL HEADER, with the 16219019Sgabor * fields enclosed by brackets "[]" replaced with your own identifying 17219019Sgabor * information: Portions Copyright [yyyy] [name of copyright owner] 18219019Sgabor * 19219019Sgabor * CDDL HEADER END 20219019Sgabor */ 21219019Sgabor 22219019Sgabor/* 23219019Sgabor * Copyright 2006 Sun Microsystems, Inc. All rights reserved. 24219019Sgabor * Use is subject to license terms. 25219019Sgabor */ 26219019Sgabor 27219019Sgabor#pragma ident "%Z%%M% %I% %E% SMI" 28219019Sgabor 29219019Sgabor/* 30219019Sgabor * ASSERTION: 31219019Sgabor * Positive lquantize() test 32219019Sgabor * 33219019Sgabor * SECTION: Aggregations/Aggregations 34219019Sgabor * 35219019Sgabor * NOTES: This is verifiable simple positive test of the lquantize() function. 36219019Sgabor * 37219019Sgabor */ 38219019Sgabor 39219019Sgabor#pragma D option quiet 40219019Sgabor 41219019SgaborBEGIN 42219019Sgabor{ 43255297Stheraven i = 0; 44255297Stheraven} 45255297Stheraven 46255297Stheraventick-10ms 47255297Stheraven/i < 1000/ 48255297Stheraven{ 49255297Stheraven @a[i] = lquantize(i, -100, 1100, 100 ); 50219019Sgabor i += 100; 51219019Sgabor} 52219019Sgabor 53219019Sgabortick-10ms 54219019Sgabor/i == 1000/ 55254273Speter{ 56281550Stijl exit(0); 57254273Speter} 58254273Speter