$ diff build.com
************
File DSA64:<TOOLS.MBOX>build.com;3
    5   $ if f$getsyi ("ARCH_TYPE") .ne. 1 then q := "/sysexe"  ! for Alpha or I64
    6   $ link/notrace/nodebug'q' mbox.obj, mbox_cld.obj, mbox_msg.obj
******
File DSA64:<TOOLS.MBOX>build.com;1
    5   $ if f$getsyi ("ARCH_TYPE") .eq. 2 then q := "/sysexe"
    6   $ link/notrace/nodebug'q' mbox.obj, mbox_cld.obj, mbox_msg.obj
************

Number of difference sections found: 1
Number of difference records found: 1

DIFFERENCES /IGNORE=()/MERGED=1-
    DSA64:<TOOLS.MBOX>build.com;3-
    DSA64:<TOOLS.MBOX>build.com;1
$ diff mbox.mar
************
File DSA64:<TOOLS.MBOX>mbox.mar;11
   46   ; V01-009       Volker Halle <volker.halle@invenate.de>         14-AUG-2005
   47   ;               Support new mailbox size > 64k (V7.3-1 or higher)
   48   ;               Disable undocumented /SIZE qualifier as it caused
   49   ;               a KRNLSTAKNV crash on I64
   50   ;
******
File DSA64:<TOOLS.MBOX>mbox.mar;1
   46   ;
************
************
File DSA64:<TOOLS.MBOX>mbox.mar;11
 1520           MOVZWL  #SS$_UNSUPPORTED, R0    ; PREVENT POSSIBLE CRASH ON I64
 1521           BRB     99$
 1522           bisl2   #<1@flg_v_size>, flags  ; Say we have seen it
******
File DSA64:<TOOLS.MBOX>mbox.mar;1
 1516           bisl2   #<1@flg_v_size>, flags  ; Say we have seen it
************
************
File DSA64:<TOOLS.MBOX>mbox.mar;11
 1789           .if ndf ucb$l_mb_iniquo
 1790           movzwl  ucb$w_iniquo(r5), (r2)          ; Get initial size
 1791           .if_false                               ; V7.3-1 or higher
 1792           movl    ucb$l_mb_iniquo(r5), (r2)       ; Get initial size from new field
 1793           .endc   ;ucb$l_mb_iniquo
 1794           probew  #0, #4, (r3)                    ; Can we write the first
 1795           beql    99$                             ; Nope so quit
 1796           .if ndf ucb$l_mb_bufquo
 1797           movzwl  ucb$w_bufquo(r5), (r3)          ; Get remaining space
 1798           .if_false                               ; V7.3-1 or higher
 1799           movl    ucb$l_mb_bufquo(r5), (r3)       ; Get remaining spce from new ield
 1800           .endc   ;ucb$l_mb_bufquo
 1801           probew  #0, #4, (r4)                    ; Can we write pid?
******
File DSA64:<TOOLS.MBOX>mbox.mar;1
 1783           movzwl  ucb$w_iniquo(r5), (r2)          ; Get initial size
 1784           probew  #0, #4, (r3)                    ; Can we write the first
 1785           beql    99$                             ; Nope so quit
 1786           movzwl  ucb$w_bufquo(r5), (r3)          ; Get remaining space
 1787           probew  #0, #4, (r4)                    ; Can we write pid?
************
************
File DSA64:<TOOLS.MBOX>mbox.mar;11
 1852           .if ndf ucb$l_mb_iniquo
 1853           subw2   ucb$w_iniquo(r5), r2            ; Find how much more
******
File DSA64:<TOOLS.MBOX>mbox.mar;1
 1838           subw2   ucb$w_iniquo(r5), r2            ; Find how much more
************
************
File DSA64:<TOOLS.MBOX>mbox.mar;11
 1859           .if_false                               ; V7.3-1 supports mbx > 64k
 1860           subl2   ucb$l_mb_iniquo(r5), r2         ; Find how much more (V7.3-1)
 1861           bvs     1$
 1862           addl2   r2, ucb$l_mb_iniquo(r5)         ; Add on difference (V7.3-1)
 1863           addl2   r2, ucb$l_mb_bufquo(r5)         ; And again to track right (V7.3-1)
 1864   1$:     movl    ucb$l_mb_iniquo(r5), r1
 1865           movl    ucb$l_mb_bufquo(r5), r2
 1866           .endc   ;ucb$l_mb_iniquo
 1867
 1868           unlock  lockname = MAILBOX, -           ; Unlock mailbox
******
File DSA64:<TOOLS.MBOX>mbox.mar;1
 1844           unlock  lockname = MAILBOX, -           ; Unlock mailbox
************

Number of difference sections found: 5
Number of difference records found: 28

DIFFERENCES /IGNORE=()/MERGED=1-
    DSA64:<TOOLS.MBOX>mbox.mar;11-
    DSA64:<TOOLS.MBOX>mbox.mar;1
I