/*  GadTools layout toolkit
**
**  Copyright © 1993-1995 by Olaf `Olsen' Barthel
**  Freely distributable.
*/

#include "gtlayout_global.h"

ULONG __regargs
LTP_Atol(STRPTR String)
{
	ULONG Value = 0;

	while(*String == ' ' || *String == '\t')
		String++;

	while(*String)
	{
		if(*String >= '0' && *String <= '9')
			Value = (Value * 10) + ((*String++) & 0xF);
		else
			break;
	}

	return(Value);
}