From ebbc20d1aabb7c462251e126929a4b2c7d3c3753 Mon Sep 17 00:00:00 2001
From: Vadim Dashevskiy <watcherhd@gmail.com>
Date: Sat, 8 Mar 2014 15:01:30 +0000
Subject: temporary revert

git-svn-id: http://svn.miranda-ng.org/main/trunk@8479 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
---
 plugins/Libs/KOL_ASM_NOUNICODE.inc | 30 +++++++++++++-----------------
 1 file changed, 13 insertions(+), 17 deletions(-)

(limited to 'plugins/Libs/KOL_ASM_NOUNICODE.inc')

diff --git a/plugins/Libs/KOL_ASM_NOUNICODE.inc b/plugins/Libs/KOL_ASM_NOUNICODE.inc
index 07e0929c3c..29c9c49f15 100644
--- a/plugins/Libs/KOL_ASM_NOUNICODE.inc
+++ b/plugins/Libs/KOL_ASM_NOUNICODE.inc
@@ -1,6 +1,6 @@
 //------------------------------------------------------------------------------
 // KOL_ASM_NOUNICODE.inc (to inlude in KOL.pas)
-// v 3.210
+// v 3.141592
 
 // this part of code is for case when ASM_VERSION is enabled and the symbol
 // UNICODE_CTRLS is NOT defined (functions, procedures and methods which work
@@ -220,7 +220,7 @@ asm
         POP      EBX
 end;
 
-function Int2Hex( Value : PtrUInt; Digits : Integer ) : KOLString;
+function Int2Hex( Value : DWord; Digits : Integer ) : KOLString;
 asm     // EAX = Value
         // EDX = Digits
         // ECX = @Result
@@ -257,7 +257,7 @@ asm     // EAX = Value
           ADD       ESP, 10h
 end;
 
-function Hex2Int( const Value : AnsiString) : PtrInt;
+function Hex2Int( const Value : AnsiString) : Integer;
 asm
         CALL     EAX2PChar
         PUSH     ESI
@@ -293,7 +293,7 @@ asm
         POP      ESI
 end;
 
-function Int2Str( Value : PtrInt ) : KOLString;
+function Int2Str( Value : Integer ) : KOLString;
 asm
         XOR       ECX, ECX
         PUSH      ECX
@@ -2259,7 +2259,7 @@ asm     //cmd    //opd
         XOR      EAX, EAX
 end;
 {$ELSE NEW VERSION OF WndProcTreeView}
-function WndProcTreeView( Self_: PControl; var Msg: TMsg; var Rslt: LRESULT ): Boolean;
+function WndProcTreeView( Self_: PControl; var Msg: TMsg; var Rslt: Integer ): Boolean;
 asm
          PUSH  ESI
          PUSH  EDI
@@ -2636,7 +2636,7 @@ asm     //cmd    //opd
    POP  EDI
 end;
 
-function WndProcDateTimePickerNotify( Self_: PControl; var Msg: TMsg; var Rslt: LRESULT ): Boolean;
+function WndProcDateTimePickerNotify( Self_: PControl; var Msg: TMsg; var Rslt: Integer ): Boolean;
 type
     TStrStr = record
         param_Date: TDateTime;
@@ -3037,7 +3037,7 @@ asm
 end;
 
 
-function WndProcKeybd( Self_: PControl; var Msg: TMsg; var Rslt: LRESULT): Boolean;
+function WndProcKeybd( Self_: PControl; var Msg: TMsg; var Rslt: Integer): Boolean;
 asm
         PUSH     EBX
         MOV      ECX, [EDX].TMsg.message
@@ -3129,14 +3129,10 @@ asm
 @@getFCaption:
         MOV       EDX, [EBX].fCaption
         XCHG      EAX, EDI
-        {$IFDEF UNICODE_CTRLS}
-            {$IFDEF UStr_}
-            CALL      System.@UStrFromPChar
-            {$ELSE}
-            CALL      System.@WStrFromPChar
-            {$ENDIF}
+        {$IFNDEF UNICODE_CTRLS}
+        CALL      System.@LStrAsg
         {$ELSE}
-            CALL      System.@LStrAsg
+        CALL      System.@WStrFromPChar
         {$ENDIF}
 @@exit:
         POP       EDI
@@ -3479,7 +3475,7 @@ asm
         POP      EBX
 end;
 
-function TTrayIcon.SetTrayIcon(const Value: DWORD): Boolean;
+procedure TTrayIcon.SetTrayIcon(const Value: DWORD);
 const sz_tid = sizeof( TNotifyIconData );
 asm
         CMP      [AppletTerminated], 0
@@ -3527,7 +3523,7 @@ asm
 @@exit:
 end;
 
-function WndProcJustOneNotify( Control: PControl; var Msg: TMsg; var Rslt: LRESULT ) : Boolean;
+function WndProcJustOneNotify( Control: PControl; var Msg: TMsg; var Rslt: Integer ) : Boolean;
 asm
         PUSH     EBP
         MOV      EBP, ESP
@@ -4323,7 +4319,7 @@ asm
         ADD      ESP, 1028
 end;
 
-procedure TBitmap.LoadFromResourceName(Inst: HINST; ResName: PAnsiChar);
+procedure TBitmap.LoadFromResourceName(Inst: DWORD; ResName: PAnsiChar);
 asm
         PUSH     EBX
         MOV      EBX, EAX
-- 
cgit v1.2.3