xref: /onnv-gate/usr/src/lib/libc/i386/gen/lsub.s (revision 7298:b69e27387f74)
10Sstevel@tonic-gate/*
20Sstevel@tonic-gate * CDDL HEADER START
30Sstevel@tonic-gate *
40Sstevel@tonic-gate * The contents of this file are subject to the terms of the
56812Sraf * Common Development and Distribution License (the "License").
66812Sraf * You may not use this file except in compliance with the License.
70Sstevel@tonic-gate *
80Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
90Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing.
100Sstevel@tonic-gate * See the License for the specific language governing permissions
110Sstevel@tonic-gate * and limitations under the License.
120Sstevel@tonic-gate *
130Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each
140Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
150Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the
160Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying
170Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner]
180Sstevel@tonic-gate *
190Sstevel@tonic-gate * CDDL HEADER END
200Sstevel@tonic-gate */
216812Sraf
220Sstevel@tonic-gate/*
236812Sraf * Copyright 2008 Sun Microsystems, Inc.  All rights reserved.
240Sstevel@tonic-gate * Use is subject to license terms.
250Sstevel@tonic-gate */
260Sstevel@tonic-gate
27*7298SMark.J.Nelson@Sun.COM	.file	"lsub.s"
280Sstevel@tonic-gate
290Sstevel@tonic-gate/ Double long subtraction routine.
300Sstevel@tonic-gate
310Sstevel@tonic-gate#include "SYS.h"
320Sstevel@tonic-gate
330Sstevel@tonic-gate	.set	lop,4
340Sstevel@tonic-gate	.set	rop,12
350Sstevel@tonic-gate	.set	ans,0
360Sstevel@tonic-gate
370Sstevel@tonic-gate	ENTRY(lsub)
380Sstevel@tonic-gate	popl	%eax
390Sstevel@tonic-gate	xchgl	%eax,0(%esp)
400Sstevel@tonic-gate	movl	lop(%esp),%ecx
410Sstevel@tonic-gate	subl	rop(%esp),%ecx
420Sstevel@tonic-gate	movl	lop+4(%esp),%edx
430Sstevel@tonic-gate	sbbl	rop+4(%esp),%edx
440Sstevel@tonic-gate	movl	%ecx,ans(%eax)
450Sstevel@tonic-gate	movl	%edx,ans+4(%eax)
460Sstevel@tonic-gate	ret
470Sstevel@tonic-gate	SET_SIZE(lsub)
48