DIFFERENCE doesn't handle long (>255 chars) lines well. Use BACKUP instead. No, I'm not joking.
This commit is contained in:
parent
02ab618c97
commit
13427e4561
@ -52,27 +52,27 @@ $ write sys$output "p -> p"
|
||||
$ 'cmd' -in f.p -inform p -outform p -out ff.p3
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$ difference/output=nl: fff.p f.p
|
||||
$ backup/compare fff.p f.p
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$ difference/output=nl: fff.p ff.p1
|
||||
$ backup/compare fff.p ff.p1
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$! difference/output=nl: fff.p ff.p2
|
||||
$! backup/compare fff.p ff.p2
|
||||
$! if $severity .ne. 1 then exit 3
|
||||
$ difference/output=nl: fff.p ff.p3
|
||||
$ backup/compare fff.p ff.p3
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$! difference/output=nl: f.t ff.t1
|
||||
$! backup/compare f.t ff.t1
|
||||
$! if $severity .ne. 1 then exit 3
|
||||
$! difference/output=nl: f.t ff.t2
|
||||
$! backup/compare f.t ff.t2
|
||||
$! if $severity .ne. 1 then exit 3
|
||||
$! difference/output=nl: f.t ff.t3
|
||||
$! backup/compare f.t ff.t3
|
||||
$! if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$ difference/output=nl: f.p ff.p1
|
||||
$ backup/compare f.p ff.p1
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$! difference/output=nl: f.p ff.p2
|
||||
$! backup/compare f.p ff.p2
|
||||
$! if $severity .ne. 1 then exit 3
|
||||
$ difference/output=nl: f.p ff.p3
|
||||
$ backup/compare f.p ff.p3
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$ delete f.*;*,ff.*;*,fff.*;*
|
||||
|
@ -13,14 +13,14 @@ $
|
||||
$ write sys$output "cat"
|
||||
$ 'cmd' enc -in 'test' -out 'test'-cipher
|
||||
$ 'cmd' enc -in 'test'-cipher -out 'test'-clear
|
||||
$ difference/output=nl: 'test' 'test'-clear
|
||||
$ backup/compare 'test' 'test'-clear
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$ delete 'test'-cipher;*,'test'-clear;*
|
||||
$
|
||||
$ write sys$output "base64"
|
||||
$ 'cmd' enc -a -e -in 'test' -out 'test'-cipher
|
||||
$ 'cmd' enc -a -d -in 'test'-cipher -out 'test'-clear
|
||||
$ difference/output=nl: 'test' 'test'-clear
|
||||
$ backup/compare 'test' 'test'-clear
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$ delete 'test'-cipher;*,'test'-clear;*
|
||||
$
|
||||
@ -32,14 +32,14 @@ $ read/end=loop_cipher_commands_end f i
|
||||
$ write sys$output i
|
||||
$ 'cmd' 'i' -bufsize 113 -e -k test -in 'test' -out 'test'-'i'-cipher
|
||||
$ 'cmd' 'i' -bufsize 157 -d -k test -in 'test'-'i'-cipher -out 'test'-'i'-clear
|
||||
$ difference/output=nl: 'test' 'test'-'i'-clear
|
||||
$ backup/compare 'test' 'test'-'i'-clear
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$ delete 'test'-'i'-cipher;*,'test'-'i'-clear;*
|
||||
$
|
||||
$ write sys$output i," base64"
|
||||
$ 'cmd' 'i' -bufsize 113 -a -e -k test -in 'test' -out 'test'-'i'-cipher
|
||||
$ 'cmd' 'i' -bufsize 157 -a -d -k test -in 'test'-'i'-cipher -out 'test'-'i'-clear
|
||||
$ difference/output=nl: 'test' 'test'-'i'-clear
|
||||
$ backup/compare 'test' 'test'-'i'-clear
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$ delete 'test'-'i'-cipher;*,'test'-'i'-clear;*
|
||||
$
|
||||
|
@ -34,16 +34,16 @@ $ write sys$output "p -> p"
|
||||
$ 'cmd' -in f.p -inform p -outform p -out ff.p3
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$ difference/output=nl: fff.p f.p
|
||||
$ backup/compare fff.p f.p
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$ difference/output=nl: fff.p ff.p1
|
||||
$ backup/compare fff.p ff.p1
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$ difference/output=nl: fff.p ff.p3
|
||||
$ backup/compare fff.p ff.p3
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$ difference/output=nl: f.p ff.p1
|
||||
$ backup/compare f.p ff.p1
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$ difference/output=nl: f.p ff.p3
|
||||
$ backup/compare f.p ff.p3
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$ delete f.*;*,ff.*;*,fff.*;*
|
||||
|
@ -34,9 +34,9 @@ $ write sys$output "p -> p"
|
||||
$ 'cmd' -in f.p -inform p -outform p -out ff.p3
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$ difference/output=nl: f.p ff.p1
|
||||
$ backup/compare f.p ff.p1
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$ difference/output=nl: f.p ff.p3
|
||||
$ backup/compare f.p ff.p3
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$ delete f.*;*,ff.*;*,fff.*;*
|
||||
|
@ -52,27 +52,27 @@ $ write sys$output "p -> p"
|
||||
$ 'cmd' -in f.p -inform p -outform p -out ff.p3
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$ difference/output=nl: fff.p f.p
|
||||
$ backup/compare fff.p f.p
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$ difference/output=nl: fff.p ff.p1
|
||||
$ backup/compare fff.p ff.p1
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$! difference/output=nl: fff.p ff.p2
|
||||
$! backup/compare fff.p ff.p2
|
||||
$! if $severity .ne. 1 then exit 3
|
||||
$ difference/output=nl: fff.p ff.p3
|
||||
$ backup/compare fff.p ff.p3
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$! difference/output=nl: f.t ff.t1
|
||||
$! backup/compare f.t ff.t1
|
||||
$! if $severity .ne. 1 then exit 3
|
||||
$! difference/output=nl: f.t ff.t2
|
||||
$! backup/compare f.t ff.t2
|
||||
$! if $severity .ne. 1 then exit 3
|
||||
$! difference/output=nl: f.t ff.t3
|
||||
$! backup/compare f.t ff.t3
|
||||
$! if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$ difference/output=nl: f.p ff.p1
|
||||
$ backup/compare f.p ff.p1
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$! difference/output=nl: f.p ff.p2
|
||||
$! backup/compare f.p ff.p2
|
||||
$! if $severity .ne. 1 then exit 3
|
||||
$ difference/output=nl: f.p ff.p3
|
||||
$ backup/compare f.p ff.p3
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$ delete f.*;*,ff.*;*,fff.*;*
|
||||
|
@ -52,27 +52,27 @@ $ write sys$output "p -> p"
|
||||
$ 'cmd' -in f.p -inform p -outform p -out ff.p3
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$ difference/output=nl: fff.p f.p
|
||||
$ backup/compare fff.p f.p
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$ difference/output=nl: fff.p ff.p1
|
||||
$ backup/compare fff.p ff.p1
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$! difference/output=nl: fff.p ff.p2
|
||||
$! backup/compare fff.p ff.p2
|
||||
$! if $severity .ne. 1 then exit 3
|
||||
$ difference/output=nl: fff.p ff.p3
|
||||
$ backup/compare fff.p ff.p3
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$! difference/output=nl: f.t ff.t1
|
||||
$! backup/compare f.t ff.t1
|
||||
$! if $severity .ne. 1 then exit 3
|
||||
$! difference/output=nl: f.t ff.t2
|
||||
$! backup/compare f.t ff.t2
|
||||
$! if $severity .ne. 1 then exit 3
|
||||
$! difference/output=nl: f.t ff.t3
|
||||
$! backup/compare f.t ff.t3
|
||||
$! if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$ difference/output=nl: f.p ff.p1
|
||||
$ backup/compare f.p ff.p1
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$! difference/output=nl: f.p ff.p2
|
||||
$! backup/compare f.p ff.p2
|
||||
$! if $severity .ne. 1 then exit 3
|
||||
$ difference/output=nl: f.p ff.p3
|
||||
$ backup/compare f.p ff.p3
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$ delete f.*;*,ff.*;*,fff.*;*
|
||||
|
@ -52,27 +52,27 @@ $ write sys$output "p -> p"
|
||||
$ 'cmd' -in f.p -inform p -outform p -out ff.p3
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$ difference/output=nl: fff.p f.p
|
||||
$ backup/compare fff.p f.p
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$ difference/output=nl: fff.p ff.p1
|
||||
$ backup/compare fff.p ff.p1
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$! difference/output=nl: fff.p ff.p2
|
||||
$! backup/compare fff.p ff.p2
|
||||
$! if $severity .ne. 1 then exit 3
|
||||
$ difference/output=nl: fff.p ff.p3
|
||||
$ backup/compare fff.p ff.p3
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$! difference/output=nl: f.t ff.t1
|
||||
$! backup/compare f.t ff.t1
|
||||
$! if $severity .ne. 1 then exit 3
|
||||
$! difference/output=nl: f.t ff.t2
|
||||
$! backup/compare f.t ff.t2
|
||||
$! if $severity .ne. 1 then exit 3
|
||||
$! difference/output=nl: f.t ff.t3
|
||||
$! backup/compare f.t ff.t3
|
||||
$! if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$ difference/output=nl: f.p ff.p1
|
||||
$ backup/compare f.p ff.p1
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$! difference/output=nl: f.p ff.p2
|
||||
$! backup/compare f.p ff.p2
|
||||
$! if $severity .ne. 1 then exit 3
|
||||
$ difference/output=nl: f.p ff.p3
|
||||
$ backup/compare f.p ff.p3
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$ delete f.*;*,ff.*;*,fff.*;*
|
||||
|
@ -52,27 +52,27 @@ $ write sys$output "p -> p"
|
||||
$ 'cmd' -in f.p -inform p -outform p -out ff.p3
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$ difference/output=nl: fff.p f.p
|
||||
$ backup/compare fff.p f.p
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$ difference/output=nl: fff.p ff.p1
|
||||
$ backup/compare fff.p ff.p1
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$ difference/output=nl: fff.p ff.p2
|
||||
$ backup/compare fff.p ff.p2
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$ difference/output=nl: fff.p ff.p3
|
||||
$ backup/compare fff.p ff.p3
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$ difference/output=nl: f.n ff.n1
|
||||
$ backup/compare f.n ff.n1
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$ difference/output=nl: f.n ff.n2
|
||||
$ backup/compare f.n ff.n2
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$ difference/output=nl: f.n ff.n3
|
||||
$ backup/compare f.n ff.n3
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$ difference/output=nl: f.p ff.p1
|
||||
$ backup/compare f.p ff.p1
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$ difference/output=nl: f.p ff.p2
|
||||
$ backup/compare f.p ff.p2
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$ difference/output=nl: f.p ff.p3
|
||||
$ backup/compare f.p ff.p3
|
||||
$ if $severity .ne. 1 then exit 3
|
||||
$
|
||||
$ delete f.*;*,ff.*;*,fff.*;*
|
||||
|
Loading…
x
Reference in New Issue
Block a user