1*42222Sbostic/*- 2*42222Sbostic * Copyright (c) 1990 The Regents of the University of California. 3*42222Sbostic * All rights reserved. 4*42222Sbostic * 5*42222Sbostic * This code is derived from software contributed to Berkeley by 6*42222Sbostic * the Systems Programming Group of the University of Utah Computer 7*42222Sbostic * Science Department. 8*42222Sbostic * 9*42222Sbostic * %sccs.include.redist.c% 10*42222Sbostic * 11*42222Sbostic * @(#)log10.s 5.1 (Berkeley) 05/17/90 12*42222Sbostic */ 13*42222Sbostic 14*42222Sbostic/* log10(x) */ 15*42222Sbostic 16*42222Sbostic .text 17*42222Sbostic .globl _log10 18*42222Sbostic 19*42222Sbostic_log10: 20*42222Sbostic flog10d sp@(4),fp0 21*42222Sbostic fmoved fp0,sp@- 22*42222Sbostic movel sp@+,d0 23*42222Sbostic movel sp@+,d1 24*42222Sbostic rts 25