Trailing-Edge
-
PDP-10 Archives
-
tops10and20_integ_tools_v9_3-aug-86
-
tools/crc/browse/ftncmd.for
There are no other files named ftncmd.for in the archive.
c routine to set up defaults in common block for maccmd data input routines
c G.Gibbs aug '82
c
subroutine ftncmd
implicit integer (a-z)
common/cmdstg/cmdbfr(70),atmbfr(70),fdb(5),hlpbfr(25),
+ defbfr(56),gjfblk(15),argblk(5)
common/cmdprm/initf,retrys,tried,endnse,raise,savret,
+ savp,exilab,spare(4),cmdblk(10)
data retrys/-1/,endnse/1/
continue
return
end