1 /* Copyright (C) 1995,1996 Robert de Bath <rdebath@cix.compulink.co.uk> 2 * This file is part of the Linux-8086 C library and is distributed 3 * under the GNU Library General Public License. 4 */ 5 6 static char buf[12]; 7 8 extern char * ultoa(); 9 ltoa(val)10char * ltoa(val) 11 long val; 12 { 13 char *p; 14 int flg = 0; 15 if( val < 0 ) { flg++; val= -val; } 16 p = ultoa(val); 17 if(flg) *--p = '-'; 18 return p; 19 } 20 ultoa(val)21char * ultoa(val) 22 unsigned long val; 23 { 24 char *p; 25 26 p = buf+sizeof(buf); 27 *--p = '\0'; 28 29 do 30 { 31 *--p = '0' + val%10; 32 val/=10; 33 } 34 while(val); 35 return p; 36 } 37 38