/*** *labs.c - find absolute value of a long integer * * Copyright (c) 1985-2001, Microsoft Corporation. All rights reserved. * *Purpose: * defines labs() - find absolute value of a long integer. * *Revision History: * 03-15-84 RN initial version * 04-22-87 JMB added function pragma for conversion to C 5.0 compiler * 12-11-87 JCR Added "_LOAD_DS" to declaration * 03-14-90 GJF Replaced _LOAD_DS with _CALLTYPE1, added #include * and fixed the copyright. Also, cleaned * up the formatting a bit. * 10-04-90 GJF New-style function declarator. * 12-28-90 SRW Added _CRUISER_ conditional around function pragma * 04-01-91 SRW Enable #pragma function for i386 _WIN32_ builds too. * 04-06-93 SKS Replace _CRTAPI* with __cdecl * No _CRTIMP for CRT DLL model due to intrinsic * 12-03-93 GJF Turn on #pragma function for all MS front-ends (esp., * Alpha compiler). * *******************************************************************************/ #include #include #ifdef _MSC_VER #pragma function(labs) #endif /*** *long labs(lnumber) - find absolute value of long. * *Purpose: * Find the absolute value of a long integer (lnumber if lnumber >= 0), * -lnumber if lnumber < 0). * *Entry: * long lnumber - number to find absolute value of * *Exit: * returns the absolute value of lnumber * *Exceptions: * *******************************************************************************/ long __cdecl labs ( long lnumber ) { return( lnumber>=0L ? lnumber : -lnumber ); }