Subversion Repositories Kolibri OS

Rev

Rev 1635 | Rev 2465 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1635 Rev 2434
Line 7... Line 7...
7
;; (C) 2004 Ville Turjanmaa, License: GPL                       ;;
7
;; (C) 2004 Ville Turjanmaa, License: GPL                       ;;
8
;; Addings by M.Lisovin                                         ;;
8
;; Addings by M.Lisovin                                         ;;
9
;; LFN support by diamond                                       ;;
9
;; LFN support by diamond                                       ;;
10
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
10
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
Line 11... Line 11...
11
 
11
 
Line 12... Line 12...
12
$Revision: 1504 $
12
$Revision: 2434 $
Line 13... Line 13...
13
 
13
 
Line 1167... Line 1167...
1167
	jz	.tilde
1167
	jz	.tilde
1168
; tilde is not found, insert "~1" at end
1168
; tilde is not found, insert "~1" at end
1169
	add	edi, 6
1169
	add	edi, 6
1170
	cmp	word [edi], '  '
1170
	cmp	word [edi], '  '
1171
	jnz	.insert_tilde
1171
	jnz	.insert_tilde
-
 
1172
@@:
1172
@@:	dec	edi
1173
        dec     edi
1173
	cmp	byte [edi], ' '
1174
	cmp	byte [edi], ' '
1174
	jz	@b
1175
	jz	@b
1175
	inc	edi
1176
	inc	edi
1176
.insert_tilde:
1177
.insert_tilde:
1177
	mov	word [edi], '~1'
1178
	mov	word [edi], '~1'