Files
seta75D 7c4988eac0 Init
2021-10-11 19:38:01 -03:00

39 lines
1010 B
C
Executable File

/* Copyright (c) 1986 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. */
/* This module is created for NLS on Sep.03.86 */
#ident "@(#)xgetwidth.c 1.4 92/07/14 SMI" /* from JAE2.0 1.0 */
/*
* _Xgetwidth calls _getwidth to get the values of environment variables
* CSWIDTH, SCRWIDTH and PCWIDTH, and checks the values to fit C process
* environment. This function is called only once in a program.
*/
/* #include "shlib.h" */
#include "synonyms.h"
#include <euc.h>
#include <getwidth.h>
extern eucwidth_t _eucwidth;
extern int _cswidth[];
extern char *getenv();
void
_xgetwidth()
{
*_cswidth = 1; /* set to 1 when called */
getwidth(&_eucwidth);
if (_eucwidth._eucw1 <= 4)
_cswidth[1] = _eucwidth._eucw1;
if (_eucwidth._eucw2 <= 4)
_cswidth[2] = _eucwidth._eucw2;
if (_eucwidth._eucw3 <= 4)
_cswidth[3] = _eucwidth._eucw3;
}