fixing numbers

Author: chatscriptnlp

SRC/dictionaryMore.h

@@ -53,6 +53,7 @@
 #define BUILD0					0x00100000		// comes from build0 data (marker on functions, concepts, topics)
 #define BUILD1					0x00200000		// comes from build1 data
 #define HAS_EXCLUDE				0x00400000		// concept/topic has keywords to exclude
+#define JSON_REFERENCE			HAS_EXCLUDE	// json struct is referred to by user variable
 #define BUILD2					0x00800000		// comes from dynamic build layer data
 #define FUNCTION_NAME			0x01000000 	//   name of a ^function  (has non-zero ->x.codeIndex if system, else is user but can be patternmacro,outputmacro, or plan) only applicable to ^ words
 #define CONCEPT					0x02000000	// topic or concept has been read via a definition

SRC/dictionarySystem.cpp

@@ -658,9 +658,9 @@ void RemoveInternalFlag(WORDP D,unsigned int flag)
 	D->internalBits &= -1 ^ flag;
 }
 
-static void PreserveFlags(WORDP D)
+static void PreserveSystemFlags(WORDP D)
 {			
-	unsigned int* at = (unsigned int*) AllocateHeap (NULL,2, sizeof(uint64),false); // PreserveFlags
+	unsigned int* at = (unsigned int*) AllocateHeap (NULL,2, sizeof(uint64),false); // PreserveSystemFlags
 	*at = flagsRedefines;
 	at[1] = Word2Index(D);
 	flagsRedefines = Heap2Index((char*)at);
@@ -672,7 +672,7 @@ void AddSystemFlag(WORDP D, uint64 flag)
 	if (flag & NOCONCEPTLIST && *D->word != '~') flag ^= NOCONCEPTLIST; // not allowed to mark anything but concepts with this
 	if (flag && flag != D->systemFlags) // prove there is a change - dont use & because if some bits are set is not enough
 	{
-		if (D < dictionaryLocked) PreserveFlags(D);
+		if (D < dictionaryLocked) PreserveSystemFlags(D);
 		D->systemFlags |= flag;
 	}
 }
@@ -691,7 +691,7 @@ void RemoveSystemFlag(WORDP D, uint64 flags)
 {
 	if (D->systemFlags & flags)
 	{
-		if (D < dictionaryLocked) PreserveFlags(D);
+		if (D < dictionaryLocked) PreserveSystemFlags(D);
 		D->systemFlags &= -1LL ^ flags;
 	}
 }