Files
Arquivotheca.Solaris-2.5/cmd/fmli/sys/strappend.c
seta75D 7c4988eac0 Init
2021-10-11 19:38:01 -03:00

51 lines
1.0 KiB
C
Executable File

/* Copyright (c) 1984, 1986, 1987, 1988, 1989 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. */
/*
* Copyright (c) 1986 AT&T
* All Rights Reserved
*/
#ident "@(#)strappend.c 1.4 92/07/14 SMI" /* SVr4.0 1.1 */
#include <stdio.h>
#include "wish.h"
#include "var_arrays.h"
/*
* add string to the end of a var_array string
*/
struct v_array *
array_strappend(array, string)
struct v_array array[];
char *string;
{
register struct v_array *ptr;
ptr = v_header(array_grow(array, strlen(string)));
if (string != NULL)
strcat(v_body(ptr), string);
return v_body(ptr);
}
/*
* do the same with a character
*/
struct v_array *
array_chappend(array, ch)
struct v_array array[];
char ch;
{
register char *cp;
register struct v_array *ptr;
ptr = v_header(array_grow(array, 1));
cp = ((char *) v_body(ptr)) + strlen(v_body(ptr));
*cp++ = ch;
*cp = '\0';
return v_body(ptr);
}