/**************************************************************** * * * Copyright 2001 Sanchez Computer Associates, Inc. * * * * This source code contains the intellectual property * * of its copyright holder(s), and is made available * * under a license. If you do not know the terms of * * the license, please stop and do not read further. * * * ****************************************************************/ #include "mdef.h" #include "compiler.h" oprtype put_indr(x) oprtype *x; { mval *p; oprtype a; a.oprclass = INDR_REF; a.oprval.indr = x; return a; }