Mercurial > hg > Members > kono > os9 > sbc09

comparison src/os9/level2/cmds/loop.asm @ 67:02d742bf52e5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
reorganize commands
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Thu, 02 Aug 2018 08:30:39 +0900
parents cmds/loop.asm@efbe39fee3ae
children 4967d1acd34a
comparison
equal deleted inserted replaced
66:1ff0a1fdd5d7 67:02d742bf52e5
1 ********************************************************************
2 * Cmp - Binary file comparison utility
3 *
4 * $Id$
5 *
6 * Edt/Rev YYYY/MM/DD Modified by
7 * Comment
8 * ------------------------------------------------------------------
9 * 1 2003/01/20 Boisy G. Pitre
10 * Rewritten in assembly for size.
11
12 nam Cmp
13 ttl Binary file comparison utility
14
15 ifp1
16 use defsfile
17 endc
18
19 * Module header definitions
20 tylg set Prgrm+Objct
21 atrv set ReEnt+rev
22 rev set $00
23 edition set 1
24
25 mod eom,name,tylg,atrv,start,size
26
27 org 0
28 count rmb 2
29 size equ .
30
31 name fcs /Loop/
32 fcb edition
33
34 start ldy #4000
35 l1 ldx #0
36 l0 leax -1,x
37 bne l0
38 leay -1,y
39 bne l1
40 Exit clrb
41 os9 F$Exit
42
43
44 emod
45 eom equ *
46 end