ref: 47f2839fc9fb3a0fa227bc4a8781791cfde48bc6
dir: /sys/src/cmd/test/patch/patch.rc/
#!/bin/rc -e fn check{ if(! cmp $1 $2){ >[2=1] echo fail: $1 $2 >[2=1] diff -u $1 $2 exit mismatch } status=() } fn checkpatch{ rm -f $1.out ../../$O.patch $*(2-) $1.patch check $1.out $1.expected } fn checkrej { rm -f $1.rout checkpatch $1 -r $1.rout check $1.rout $1.rexpected } checkpatch basic checkpatch header checkpatch create checkrej rej seq 12 > delete.out ../../$O.patch delete.patch test ! -f delete.out rm -f multifile^(1 2)^.out multifile^(1 2)^.in.tmp cp multifile1.in multifile1.in.tmp cp multifile2.in multifile2.in.tmp chmod 640 multifile1.in.tmp chmod 400 multifile2.in.tmp ../../$O.patch multifile.patch check multifile1.out multifile1.expected check multifile2.out multifile2.expected if(! ~ `{walk -ex multifile1.out} --rw-r-----) exit misperm1 if(! ~ `{walk -ex multifile2.out} --rw-------) exit misperm2 status=()