1*2633Sahl /* 2*2633Sahl * CDDL HEADER START 3*2633Sahl * 4*2633Sahl * The contents of this file are subject to the terms of the 5*2633Sahl * Common Development and Distribution License (the "License"). 6*2633Sahl * You may not use this file except in compliance with the License. 7*2633Sahl * 8*2633Sahl * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 9*2633Sahl * or http://www.opensolaris.org/os/licensing. 10*2633Sahl * See the License for the specific language governing permissions 11*2633Sahl * and limitations under the License. 12*2633Sahl * 13*2633Sahl * When distributing Covered Code, include this CDDL HEADER in each 14*2633Sahl * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 15*2633Sahl * If applicable, add the following below this CDDL HEADER, with the 16*2633Sahl * fields enclosed by brackets "[]" replaced with your own identifying 17*2633Sahl * information: Portions Copyright [yyyy] [name of copyright owner] 18*2633Sahl * 19*2633Sahl * CDDL HEADER END 20*2633Sahl */ 21*2633Sahl 22*2633Sahl /* 23*2633Sahl * Copyright 2006 Sun Microsystems, Inc. All rights reserved. 24*2633Sahl * Use is subject to license terms. 25*2633Sahl */ 26*2633Sahl 27*2633Sahl #pragma ident "%Z%%M% %I% %E% SMI" 28*2633Sahl 29*2633Sahl /* 30*2633Sahl * ASSERTION: 31*2633Sahl * Translate an input expression to a pointer to a struct 32*2633Sahl * 33*2633Sahl * SECTION: Translators/ Translator Declarations 34*2633Sahl * SECTION: Translators/ Translate Operator 35*2633Sahl * 36*2633Sahl */ 37*2633Sahl 38*2633Sahl #pragma D option quiet 39*2633Sahl 40*2633Sahl struct myinput_struct { 41*2633Sahl int i; 42*2633Sahl char c; 43*2633Sahl }; 44*2633Sahl 45*2633Sahl struct myoutput_struct { 46*2633Sahl int myi; 47*2633Sahl char myc; 48*2633Sahl }; 49*2633Sahl 50*2633Sahl translator struct myoutput_struct < struct myinput_struct ivar > 51*2633Sahl { 52*2633Sahl myi = ((struct myinput_struct ) ivar).i; 53*2633Sahl myc = ((struct myinput_struct ) ivar).c; 54*2633Sahl 55*2633Sahl }; 56*2633Sahl 57*2633Sahl struct myinput_struct f; 58*2633Sahl 59*2633Sahl BEGIN 60*2633Sahl { 61*2633Sahl f.i = 1203; 62*2633Sahl f.c = 'v'; 63*2633Sahl 64*2633Sahl realmyi = xlate < struct myoutput_struct *> (f)->myi; 65*2633Sahl realmyc = xlate < struct myoutput_struct *> (f)->myc; 66*2633Sahl } 67*2633Sahl 68*2633Sahl BEGIN 69*2633Sahl /(1203 != realmyi) || ('v' != realmyc)/ 70*2633Sahl { 71*2633Sahl printf("Failure"); 72*2633Sahl exit(1); 73*2633Sahl } 74*2633Sahl 75*2633Sahl BEGIN 76*2633Sahl /(1203 == realmyi) && ('v' == realmyc)/ 77*2633Sahl { 78*2633Sahl printf("Success"); 79*2633Sahl exit(0); 80*2633Sahl } 81