kolibrios/programs/develop/ktcc/trunk/libc/math/floor.asm

 
format ELF
include '../proc32.inc'
section '.text' executable

public floor

floor:

        push	ebp
	mov	ebp,esp
	sub	esp,8

	fstcw	[ebp-12]
	mov	dx,word[ebp-12]
	or	dx,0x0400	
	and	dx,0xf7ff
	mov	word[ebp-16],dx
	fldcw	[ebp-16]	

	fld	qword[ebp+8]
	frndint

	fldcw	[ebp-12]	

	leave

	ret
Mathematical functions are added some. It is added makefile for compilation of programs under KolibriOS with the help gcc. git-svn-id: svn://kolibrios.org@696 a494cfbc-eb01-0410-851d-a64ba20cac60 2008-01-14 22:33:34 +03:00
			`format ELF`
Make libck project self-containing. git-svn-id: svn://kolibrios.org@7855 a494cfbc-eb01-0410-851d-a64ba20cac60 2020-05-03 11:09:36 +03:00			`include '../proc32.inc'`
Mathematical functions are added some. It is added makefile for compilation of programs under KolibriOS with the help gcc. git-svn-id: svn://kolibrios.org@696 a494cfbc-eb01-0410-851d-a64ba20cac60 2008-01-14 22:33:34 +03:00			`section '.text' executable`

			`public floor`

			`floor:`

			`push ebp`
			`mov ebp,esp`
			`sub esp,8`

			`fstcw [ebp-12]`
			`mov dx,word[ebp-12]`
			`or dx,0x0400`
			`and dx,0xf7ff`
			`mov word[ebp-16],dx`
			`fldcw [ebp-16]`

			`fld qword[ebp+8]`
			`frndint`

			`fldcw [ebp-12]`

			`leave`

			`ret`