Lines Matching refs:cparm
309 $ cparm = f$edit(p'i',"upcase")
313 $ if f$edit(cparm,"trim") .nes. ""
315 $ if cparm .eqs. "DEBUG"
320 $ if f$locate("CCOPT=",cparm) .lt. f$length(cparm)
322 $ start = f$locate("=",cparm) + 1
323 $ len = f$length(cparm) - start
324 $ ccopt = ccopt + f$extract(start,len,cparm)
328 $ if cparm .eqs. "LINK" then linkonly = true
329 $ if f$locate("LOPTS=",cparm) .lt. f$length(cparm)
331 $ start = f$locate("=",cparm) + 1
332 $ len = f$length(cparm) - start
333 $ lopts = lopts + f$extract(start,len,cparm)
335 $ if f$locate("CC=",cparm) .lt. f$length(cparm)
337 $ start = f$locate("=",cparm) + 1
338 $ len = f$length(cparm) - start
339 $ cc_com = f$extract(start,len,cparm)
352 $ if f$locate("MAKE=",cparm) .lt. f$length(cparm)
354 $ start = f$locate("=",cparm) + 1
355 $ len = f$length(cparm) - start
356 $ mmks = f$extract(start,len,cparm)
365 $ if cparm .eqs. "HELP" then gosub bhelp