From d194fb26a21a1a74fde50cac991f4960fe9089e0 Mon Sep 17 00:00:00 2001 From: David Whitten Date: Thu, 18 Aug 2016 14:43:20 -0400 Subject: [PATCH] Update XINDX6.m --- XINDX6.m | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/XINDX6.m b/XINDX6.m index 5323cd3..1baf976 100644 --- a/XINDX6.m +++ b/XINDX6.m @@ -14,7 +14,7 @@ D ANS("Print more than compiled errors and warnings? YES//","YN","Print detailed info") G:X="^" END S INP(1)="Yy"[X G:'INP(1) L7 D ANS("Print summary only? NO//","NY","Skip detail on each routine") G:X="^" END S INP(6)="Yy"[X G L7:INP(6) D ANS("Print routines? YES//","YN","Print routines code also") G:X="^" END S INP(2)="Yy"[X - I INP(2) D ANS("Print (R)egular,(S)tructured or (B)oth w/ Line (N)umbers or (O)ffsets or w/ Control (F)low? R//","RLIST") G:X="^" END S INP(5)=X + I INP(2) D ANS("Print (R)egular,(S)tructured or (B)oth w/ Control (F)low and (L)ine Numbers or (N)o Offsets or ? R//","RLIST") G:X="^" END S INP(5)=X I INDDA>0 D ANS("Print the DDs, Functions, and Options? YES//","YN","Gather other package code.") G:X="^" END S INP(4)="Yy"[X D ANS("Print errors and warnings with each routine? YES//","YN") G:X="^" END S INP(3)="Yy"[X L7 I $D(^DIC(9.8,0)),$D(DUZ) D ANS("Save parameters in ROUTINE file? NO//","NY","Update the ROUTINE file with details") G:X="^" END S INP(7)="Yy"[X