Changeset 718 for ccr/trunk/p/C0CRNF.m

Timestamp:

Feb 28, 2010, 7:42:07 PM (14 years ago)

Author:

George Lilly

Message:

some parse debugging updates

File:

• ccr/trunk/p/C0CRNF.m (modified) (1 diff)

ccr/trunk/p/C0CRNF.m

@@ -37 +37 @@
  . . ;I C0CFN="STR" W C0CFN," ",C0CFJ,!
  . . I $D(@C0CFRTN@(C0CFN)) D  ; IS THIS A DUPLICATE?
- . . . I DEBUG D  ;
+ . . . I $G(DEBUG) D  ;
  . . . . W "DUPLICATE FOUND! ",C0CFJ," ",C0CFI," ",C0CFN,!,@C0CFRTN@(C0CFN),!
  . . . S @C0CFRTN@(C0CFN_"_"_C0CFJ)=C0CFJ_"^"_C0CFI