17c478bdstevel@tonic-gate/*
27c478bdstevel@tonic-gate * CDDL HEADER START
37c478bdstevel@tonic-gate *
47c478bdstevel@tonic-gate * The contents of this file are subject to the terms of the
57c478bdstevel@tonic-gate * Common Development and Distribution License, Version 1.0 only
67c478bdstevel@tonic-gate * (the "License").  You may not use this file except in compliance
77c478bdstevel@tonic-gate * with the License.
87c478bdstevel@tonic-gate *
97c478bdstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
107c478bdstevel@tonic-gate * or http://www.opensolaris.org/os/licensing.
117c478bdstevel@tonic-gate * See the License for the specific language governing permissions
127c478bdstevel@tonic-gate * and limitations under the License.
137c478bdstevel@tonic-gate *
147c478bdstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each
157c478bdstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
167c478bdstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the
177c478bdstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying
187c478bdstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner]
197c478bdstevel@tonic-gate *
207c478bdstevel@tonic-gate * CDDL HEADER END
217c478bdstevel@tonic-gate */
227c478bdstevel@tonic-gate/*	Copyright (c) 1988 AT&T	*/
237c478bdstevel@tonic-gate/*	  All Rights Reserved  	*/
247c478bdstevel@tonic-gate
257c478bdstevel@tonic-gate
267c478bdstevel@tonic-gate/*
277c478bdstevel@tonic-gate *      Copyright (c) 1997, by Sun Microsystems, Inc.
287c478bdstevel@tonic-gate *      All rights reserved.
297c478bdstevel@tonic-gate */
307c478bdstevel@tonic-gate
317c478bdstevel@tonic-gate#pragma ident	"%Z%%M%	%I%	%E% SMI" /* SVr4.0 1.1 */
327c478bdstevel@tonic-gate
337c478bdstevel@tonic-gate/*LINTLIBRARY*/
347c478bdstevel@tonic-gate
357c478bdstevel@tonic-gate#include <sys/types.h>
367c478bdstevel@tonic-gate#include "utility.h"
377c478bdstevel@tonic-gate
387c478bdstevel@tonic-gateint
397c478bdstevel@tonic-gateset_field_init(FORM *f, PTF_void func)
407c478bdstevel@tonic-gate{
417c478bdstevel@tonic-gate	Form(f)->fieldinit = func;
427c478bdstevel@tonic-gate	return (E_OK);
437c478bdstevel@tonic-gate}
447c478bdstevel@tonic-gate
457c478bdstevel@tonic-gatePTF_void
467c478bdstevel@tonic-gatefield_init(FORM *f)
477c478bdstevel@tonic-gate{
487c478bdstevel@tonic-gate	return (Form(f)->fieldinit);
497c478bdstevel@tonic-gate}
50