aboutsummaryrefslogtreecommitdiff
path: root/pkg/dataio/reblock/reblock.com
blob: 35bc652d35f4cb2be56f9141785f021a5f996e26 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
# input parameters
int  szb_outblock	# size of output block in bytes
int  szb_inrecord	# size of input record in bytes
int  szb_outrecord	# size of output record in bytes
int  nskip		# number  blocks (tape) or records (disk) to be skipped
int  ncopy		# number of blocks (tape) or records (disk) to be copied
int  padvalue		# integer value of padcharacter

# integer switches
int intape			# input tape device
int outtape			# output tape device	
int reblock			# reformat?
int pad_block			# pad short blocks
int pad_record			# pad records
int trim_record			# trim records
int byteswap			# swap every other byte
int wordswap			# swap every other word

common /reblock/ szb_outblock, szb_inrecord, szb_outrecord, nskip, ncopy,
		    padvalue, intape, outtape, reblock, pad_block, pad_record,
		    trim_record, byteswap, wordswap