fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2013-04-06 19:57 UTC+0200 Viktor Szakats (harbour syenar.net)

Browse Source 
* contrib/hbct/trig.c
    ! another fix

  * contrib/hbwin/wapi_winuser.c
    * deleted comment in some foreign programming language

  * src/rtl/hbmd5.c
    * cleaned comment
This commit is contained in:
Viktor Szakats
2013-04-06 19:58:02 +02:00
parent c0c7172788
commit e88a4b1f20
4 changed files with 26 additions and 29 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
ChangeLog.txt
View File

@@ -10,6 +10,16 @@
* Change, ! Fix, % Optimization, + Addition, - Removal, ; Comment
*/
2013-04-06 19:57 UTC+0200 Viktor Szakats (harbour syenar.net)
* contrib/hbct/trig.c
! another fix
* contrib/hbwin/wapi_winuser.c
* deleted comment in some foreign programming language
* src/rtl/hbmd5.c
* cleaned comment
2013-04-06 18:25 UTC+0200 Viktor Szakats (harbour syenar.net)
* src/rtl/hbmd5.c
! another typo in prev

2
contrib/hbct/trig.c
View File

@@ -468,7 +468,7 @@ HB_FUNC( TANH )
double dResult, dArg = hb_parnd( 1 );
hb_mathResetError( &hb_exc );
dResult = Tanh( dArg );
dResult = tanh( dArg );
if( hb_mathGetError( &hb_exc, "TANH", dArg, 0.0, dResult ) )
{
if( hb_exc.handled )

15
contrib/hbwin/wapi_winuser.c
View File

@@ -211,9 +211,8 @@ HB_FUNC( WAPI_DRAWTEXT )
hb_errRT_BASE( EG_ARG, 2010, NULL, HB_ERR_FUNCNAME, HB_ERR_ARGS_BASEPARAMS );
}
/*-----------------------------------------------------------------------/
BEGIN SCROLLBAR MANIPULATION WINAPI FUNCTIONS
/-----------------------------------------------------------------------*/
/* BEGIN SCROLLBAR MANIPULATION WINAPI FUNCTIONS */
/*
BOOL EnableScrollBar( HWND hWnd, UINT wSBflags, UINT wArrows );
*/
@@ -238,16 +237,6 @@ HB_FUNC( WAPI_ENABLESCROLLBAR )
/*
BOOL GetScrollBarInfo( HWND hwnd, LONG idObject, PSCROLLBARINFO psbi );
$$
Local strSCROLLBARINFO IS SCROLLBARINFO
Local cSCROLLBARINFO = strSCROLLBARINFO:value
Local nCtrlType = OBJID_CLIENT | OBJID_HSCROLL | OBJID_VSCROLL
lSuccess := wapi_GetScrollInfo( hWnd, nCtrType, @cSCROLLINFO )
strSCROLLBARINFO:buffer( cSCROLLBARINFO )
? strSCROLLINFO:
$$
*/
#if 0
HB_FUNC( WAPI_GETSCROLLBARINFO )

28
src/rtl/hbmd5.c
View File

@@ -73,21 +73,6 @@
ASCII hex MD5 digest as 32-byte string
empty string on error
C functions:
void hb_MD5( const void * data, HB_SIZE datalen, char * digest )
Parameters:
data - input byte stream
datalen - input stream length
digest - raw (unformatted) MD5 digest buffer
(at least 16 bytes long)
void hb_MD5File( HB_FHANDLE hFile, char * digest )
Parameters:
hFile - file handle
digest - raw (unformatted) MD5 digest buffer
(at least 16 bytes long)
*/
#include "hbapi.h"
@@ -250,6 +235,13 @@ static void hb_md5val( HB_U32 accum[], char * md5val )
}
}
/*
Parameters:
data - input byte stream
datalen - input stream length
digest - raw (unformatted) MD5 digest buffer
(at least 16 bytes long)
*/
void hb_md5( const void * data, HB_SIZE nLen, char * digest )
{
const unsigned char * ucdata = ( const unsigned char * ) data;
@@ -294,6 +286,12 @@ void hb_md5( const void * data, HB_SIZE nLen, char * digest )
hb_md5val( md5.accum, digest );
}
/*
Parameters:
hFile - file handle
digest - raw (unformatted) MD5 digest buffer
(at least 16 bytes long)
*/
void hb_md5file( HB_FHANDLE hFile, char * digest )
{
MD5_BUF md5;