Subversion Repositories Kolibri OS

Compare Revisions

Regard whitespace Rev 310 → Rev 311

/programs/develop/tinypad/trunk/tinypad.asm
3,7 → 3,7
; compiler: flat assembler 1.67.18
; memory to compile: 3.0/9.0 MBytes (without/with size optimizations)
; version: 4.0.4
; last update: 2007-01-28 (Jan 28, 2007)
; last update: 2007-02-01 (Feb 01, 2007)
; minimal kernel: revision #270 (svn://kolibrios.org/kernel)
;-----------------------------------------------------------------------------
; originally by: Ville Michael Turjanmaa >> villemt@aton.co.jyu.fi
764,6 → 764,7
file_info FILEINFO
 
checker_ed EDITOR
checker_ed_ll dd ?
 
tab_bar TABCTL
virtual at tab_bar.Current
/programs/develop/tinypad/trunk/tp-editor.asm
999,7 → 999,11
 
xor edx,edx
 
mov eax,[cur_editor.TopLeft.Y]
mov eax,[cur_editor.Lines.Count]
cmp eax,[checker_ed.Lines.Count]
je @f
or dl,REDRAW_TEXT+REDRAW_VSCROLL+REDRAW_HSCROLL
@@: mov eax,[cur_editor.TopLeft.Y]
cmp eax,[checker_ed.TopLeft.Y]
je @f
or dl,REDRAW_TEXT+REDRAW_VSCROLL
1010,6 → 1014,14
@@: or dl,dl
jnz .redraw
 
mov ecx,[cur_editor.Caret.Y]
call get_line_offset
call get_real_length
cmp eax,[checker_ed_ll]
je @f
mov [checker_ed_ll],eax
or dl,REDRAW_ONELINE
@@:
mov eax,[cur_editor.Caret.Y]
cmp eax,[checker_ed.Caret.Y]
je @f