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 the input expression to output struct type 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 BEGIN 59*2633Sahl { 60*2633Sahl f.i = 10; 61*2633Sahl f.c = 'c'; 62*2633Sahl 63*2633Sahl realmyi = xlate < struct myoutput_struct > (f).myi; 64*2633Sahl realmyc = xlate < struct myoutput_struct > (f).myc; 65*2633Sahl } 66*2633Sahl 67*2633Sahl BEGIN 68*2633Sahl /(10 != f.i) || ('c' != f.c)/ 69*2633Sahl { 70*2633Sahl exit(1); 71*2633Sahl } 72*2633Sahl 73*2633Sahl BEGIN 74*2633Sahl /(10 == f.i) && ('c' == f.c)/ 75*2633Sahl { 76*2633Sahl printf("realmyi: %d\n", realmyi); 77*2633Sahl printf("realmyc: %c\n", realmyc); 78*2633Sahl exit(0); 79*2633Sahl } 80*2633Sahl 81*2633Sahl ERROR 82*2633Sahl { 83*2633Sahl exit(1); 84*2633Sahl } 85