diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 9dd3128d47..ea29dbd178 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -8,6 +8,11 @@
    2008-12-31 13:59 UTC+0100 Foo Bar <foo.bar@foobar.org>
 */
 
+2008-07-31 10:10 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
+   * contrib/xhb/hbcompat.ch
+     + Added translations for WildMatch(), hb_DeserialNext(), 
+       hb_Checksum().
+
 2008-07-30 16:30 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
   * harbour/harbour-ce-spec
   * harbour/harbour-w32-spec
diff --git a/harbour/contrib/xhb/hbcompat.ch b/harbour/contrib/xhb/hbcompat.ch
index d56ad08b96..674198f180 100644
--- a/harbour/contrib/xhb/hbcompat.ch
+++ b/harbour/contrib/xhb/hbcompat.ch
@@ -87,6 +87,9 @@
    #xtranslate hb_idleSleep([<x,...>]) => SecondsSleep(<x>)
    #xtranslate hb_UserName()           => NetName(1)
    #xtranslate hb_FSize(<x>)           => FileSize(<x>)
+   #xtranslate hb_WildMatch([<x,...>]) => WildMatch(<x>)
+   #xtranslate hb_Deserialize(<x>)     => hb_DeserialNext(<x>)
+   #xtranslate hb_Adler32([<x,...>])   => hb_Checksum(<x>)
 
    #xtranslate hb_HexToNum([<c,...>])  => HexToNum(<c>)
    #xtranslate hb_NumToHex([<n,...>])  => NumToHex(<n>)
@@ -154,6 +157,9 @@
    #xtranslate SecondsSleep([<x,...>]) => hb_idleSleep(<x>)
    #xtranslate NetName(<n>)            => iif( ValType( <n> ) == "N" .AND. <n> == 1, hb_UserName(), NetName() )
    #xtranslate FileSize(<x>)           => hb_FSize(<x>)
+   #xtranslate WildMatch([<x,...>])    => hb_WildMatch(<x>)
+   #xtranslate hb_DeserialNext(<x>)    => hb_Deserialize(<x>)
+   #xtranslate hb_Checksum([<x,...>])  => hb_Adler32(<x>)
 
    #xtranslate HexToNum([<c,...>])     => hb_HexToNum(<c>)
    #xtranslate NumToHex([<n,...>])     => hb_NumToHex(<n>)