#include "aplwc_repl.h"

unsigned long
getenv_ulong(const char *name, unsigned long def)
{
	unsigned long ret, parsed;
	char *env, *p;

	ret = def;
	env = getenv(name);
	if((env != NULL) && (strlen(env) > 0)){
		parsed = strtoul(env, &p, 10);
		if((*p) == 0)
			ret = parsed;
	}
	return ret;
}