Files
Arquivotheca.Solaris-2.5/lib/libeti/form/field_back.c
seta75D 7c4988eac0 Init
2021-10-11 19:38:01 -03:00

39 lines
684 B
C
Executable File

/* Copyright (c) 1988 AT&T */
/* All Rights Reserved */
/* THIS IS UNPUBLISHED PROPRIETARY SOURCE CODE OF AT&T */
/* The copyright notice above does not evidence any */
/* actual or intended publication of such source code. */
#ident "@(#)field_back.c 1.2 92/07/14 SMI" /* SVr4.0 1.2 */
#include "utility.h"
/*******************
* set_field_back *
*******************/
int set_field_back (f, back)
FIELD * f;
chtype back;
{
f = Field (f);
if ((back & (chtype) A_ATTRIBUTES) != back)
return E_BAD_ARGUMENT;
if (Back (f) != back)
{
Back (f) = back;
return _sync_attrs (f);
}
return E_OK;
}
chtype field_back (f)
FIELD * f;
{
return Back (Field (f));
}