home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
OS/2 Shareware BBS: 18 REXX
/
18-REXX.zip
/
rexxuuxx.zip
/
UUXXCODE.CV2
< prev
next >
Wrap
Text File
|
1997-05-11
|
2KB
|
41 lines
/* Declarations for Unix-style file encoding/decoding routines */
DCL UUENCODE_FILE ENTRY(PTR)
OPTIONS(BYVALUE NODESCRIPTOR IRRED),
UUDECODE_FILE ENTRY(PTR)
OPTIONS(BYVALUE NODESCRIPTOR IRRED),
XXENCODE_FILE ENTRY(PTR)
OPTIONS(BYVALUE NODESCRIPTOR IRRED),
XXDECODE_FILE ENTRY(PTR)
OPTIONS(BYVALUE NODESCRIPTOR IRRED),
BASE64_ENCODE ENTRY(PTR)
OPTIONS(BYVALUE NODESCRIPTOR IRRED),
BASE64_DECODE ENTRY(PTR)
OPTIONS(BYVALUE NODESCRIPTOR IRRED);
DCL Max_in BIN FIXED(16,0) UNSIGNED INIT(0B),
1 UUXX_Encode_struct BASED,
2 In_cnt BIN FIXED(16,0) UNSIGNED,
2 Output_filename CHAR(260) VAR,
2 Msg_file CHAR(260) VAR INIT('STDOUT:'),
2 Input_filename((Max_in) REFER (In_cnt)) CHAR(260) VAR,
1 UUXX_Decode_struct BASED,
2 In_len BIN FIXED(16,0) UNSIGNED,
2 Horton_bug BIT(1) ALIGNED INIT('0'B),
2 Msg_file CHAR(260) VAR INIT('STDOUT:'),
2 Input_filename_list CHAR((Max_in) REFER (In_len)) VAR,
1 B64_Decode_struct BASED,
2 Valid_rec_len BIN FIXED(16,0) UNSIGNED,
2 In_len BIN FIXED(16,0) UNSIGNED,
2 Output_filename CHAR(260) VAR,
2 Msg_file CHAR(260) VAR INIT('STDOUT:'),
2 Input_filename_list CHAR((Max_in) REFER (In_len)) VAR;