1,3d0
< %externalroutinespec close input
< %externalroutinespec close output
< %externalroutinespec open input(%integer stream, %string(255) filename)
204,205c201
<    !input line
<    %OWNBYTEINTEGERARRAY char(0:133) =
---
>    %OWNBYTEINTEGERARRAY char(0:133) = ;  !input line
1032c1028
< {         err,1764, 247, err(4),      -rtp, -fnp, -mapp, -predp, err, 214,}
---
> !         err,1764, 247, err(4),      -rtp, -fnp, -mapp, -predp, err, 214,
1034c1030
< {         err, 229, err}
---
> !         err, 229, err
1213c1209
<    %INTEGER dbase{, da}
---
>    %INTEGER dbase, da
1218c1214
<       %INTEGER new name, vid, k1, {k2,} form
---
>       %INTEGER new name, vid, k1, k2, form
1419,1420d1414
< ! ABD - temp variable to help pack bytes into words
< %INTEGER flipflop
1530a1525,1526
> ! ABD - temp variable to help pack bytes into words
> %INTEGER flipflop
2879,2880d2874
<    %begin
<    %integer x
2882d2875
<    %end