view ueda/libueda/util.c @ 116:bb9908f36e23

m4-fp/qfpmnf.inc: basic fixes
author Mychaela Falconia <falcon@freecalypso.org>
date Sat, 13 Jun 2020 04:14:10 +0000
parents c91e7a30fab3
children
line wrap: on
line source

/*
 * Miscellaneous utility functions for libueda
 */

#include <ctype.h>
#include <stdlib.h>
#include <string.h>
#include <strings.h>

char *
copystr(src)
	register char *src;
{
	register char *buf;

	buf = malloc(strlen(src) + 1);
	if (!buf) {
		perror("malloc");
		exit(1);
	}
	strcpy(buf, src);
	return(buf);
}

string_is_valid_decnum(str)
	char *str;
{
	register char *cp = str;

	if (*cp == '-')
		cp++;
	if (!isdigit(*cp))
		return(0);
	while (isdigit(*cp))
		cp++;
	return(*cp == '\0');
}