Stop exporting a couple unparsing utilities

Author: mkantor

src/language/unparsing/plz-utilities.ts

@@ -62,22 +62,6 @@ export const moleculeUnparser =
     }
   }
 
-export const quoteIfNecessary = (value: string): string => {
-  const unquotedAtomResult = parsing.parse(unquotedAtomParser, value)
-  if (either.isLeft(unquotedAtomResult)) {
-    return quote.concat(escapeStringContents(value)).concat(quote)
-  } else {
-    return value
-  }
-}
-
-export const serializeIfNeeded = (
-  nodeOrMolecule: SemanticGraph | Molecule,
-): Either<UnserializableValueError, Atom | Molecule> =>
-  isSemanticGraph(nodeOrMolecule)
-    ? serialize(nodeOrMolecule)
-    : either.makeRight(nodeOrMolecule)
-
 export const moleculeAsKeyValuePairStrings = (
   value: Molecule,
   unparseAtomOrMolecule: UnparseAtomOrMolecule,
@@ -119,6 +103,22 @@ export const unparseAtom = (atom: string): Right<string> =>
       : quoteIfNecessary(atom),
   )
 
+const quoteIfNecessary = (value: string): string => {
+  const unquotedAtomResult = parsing.parse(unquotedAtomParser, value)
+  if (either.isLeft(unquotedAtomResult)) {
+    return quote.concat(escapeStringContents(value)).concat(quote)
+  } else {
+    return value
+  }
+}
+
+const serializeIfNeeded = (
+  nodeOrMolecule: SemanticGraph | Molecule,
+): Either<UnserializableValueError, Atom | Molecule> =>
+  isSemanticGraph(nodeOrMolecule)
+    ? serialize(nodeOrMolecule)
+    : either.makeRight(nodeOrMolecule)
+
 type UnparseAtomOrMolecule = (
   value: Atom | Molecule,
 ) => Either<UnserializableValueError, string>