Article View: be.comp.programming
Article #10434Re: Getallen naar boven afronden
From: Philip Paeps
Date: Mon, 11 Mar 2002 16:03
Date: Mon, 11 Mar 2002 16:03
45 lines
2667 bytes
2667 bytes
JanC <usenet_spam@janc.cjb.net.invalid> wrote:
> Philip Paeps <philip@paeps.cx> wrote:
>> Als er geen ceil(3) equivalent bestaat, hoop ik toch voor de
>> gezondheid van de taal dat je aan de hand van de return code van
>> de functie kunt zien of het naar boven of onder gerond heeft, en
>> dan nog in een conditional desnoods +1 doen. Heeft VB ?berhaupt
>> return codes?
> Met mijn methode maakt dat toch niet uit? Wat ik eigenlijk doe is m'n
> eigen ceil() maken adhv de wel bestaande round().
> Misschien doet ceil() intern wel hetzelfde als wat ik doe... ;-)
Precies:
__inline static const double ceil (double x)
{
int rounding_mode, round_up;
double value;
__asm volatile ("fmove%.l %%fpcr,%0"
: "=dm" (rounding_mode)
: /* no inputs */ );
round_up = rounding_mode | 0x30;
__asm volatile ("fmove%.l %0,%%fpcr"
: /* no outputs */
: "dmi" (round_up));
__asm volatile ("fint%.x %1,%0"
: "=f" (value)
: "f" (x));
__asm volatile ("fmove%.l %0,%%fpcr"
: /* no outputs */
: "dmi" (rounding_mode));
return value;
}
- Philip
--
Philip Paeps philip@paeps.cx
If you don't write to complain, you'll never receive
your order.
If you do write, you'll receive the merchandise before
your angry letter reaches its destination.
Technical Details
Message-ID:
<Zy4j8.249295$rt4.24063@afrodite.telenet-ops.be>Path:
arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!supernews.com!news-x2.support.nl!newsfeeds.belnet.be!news.belnet.be!ossa.telenet-ops.be!afrodite.telenet-ops.be.POSTED!not-for-mailReferences:
<sIri8.245299$rt4.23941@afrodite.telenet-ops.be> <Xns91CD12CF2F8CDJanC@213.224.134.178> <1fGi8.246555$rt4.24046@afrodite.telenet-ops.be> <Xns91CE10B535FB3JanC@213.224.134.6> <OI%i8.249076$rt4.23842@afrodite.telenet-ops.be> <Xns91CE9BC87C9BCJanC@213.224.134.6>Show Full Headers
Complete Article Headers
X-Google-Language: DUTCH,ASCII-7-bit
X-Google-Thread: fcea4,474631146d31b334
X-Google-Attributes: gidfcea4,public
X-Google-ArrivalTime: 2002-03-11 08:03:06 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!supernews.com!news-x2.support.nl!newsfeeds.belnet.be!news.belnet.be!ossa.telenet-ops.be!afrodite.telenet-ops.be.POSTED!not-for-mail
From: Philip Paeps <philip@paeps.cx>
Subject: Re: Getallen naar boven afronden
Newsgroups: be.comp.programming
References: <sIri8.245299$rt4.23941@afrodite.telenet-ops.be> <Xns91CD12CF2F8CDJanC@213.224.134.178> <1fGi8.246555$rt4.24046@afrodite.telenet-ops.be> <Xns91CE10B535FB3JanC@213.224.134.6> <OI%i8.249076$rt4.23842@afrodite.telenet-ops.be> <Xns91CE9BC87C9BCJanC@213.224.134.6>
User-Agent: tin/1.5.12-20020227 ("Toxicity") (UNIX) (FreeBSD/4.5-STABLE (i386))
Lines: 45
Message-ID: <Zy4j8.249295$rt4.24063@afrodite.telenet-ops.be>
Date: Mon, 11 Mar 2002 16:03:05 GMT
NNTP-Posting-Host: 213.118.35.252
X-Complaints-To: abuse@pandora.be
X-Trace: afrodite.telenet-ops.be 1015862585 213.118.35.252 (Mon, 11 Mar 2002 17:03:05 MET)
NNTP-Posting-Date: Mon, 11 Mar 2002 17:03:05 MET
Organization: Telenet Internet