move helper function InputFormOfNonStrings[] to Utils` module

FlexibleSUSY · Jan 7, 2016 · a48eb7b · a48eb7b
1 parent cec79f7
commit a48eb7b
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 3 deletions.
diff --git a/meta/EWSB.m b/meta/EWSB.m
@@ -51,9 +51,6 @@
 
 Begin["`Private`"];
 
-InputFormOfNonStrings[a_String] := a;
-InputFormOfNonStrings[a_] := InputForm[a];
-
 DebugPrint[msg___] :=
     If[FlexibleSUSY`FSDebugOutput,
        Print["Debug<EWSB>: ", Sequence @@ InputFormOfNonStrings /@ {msg}]];

diff --git a/meta/Utils.m b/meta/Utils.m
@@ -4,6 +4,8 @@
 ApplyAndConcatenate::usage = "Applies a function to a list and
 concatenates the resulting list.";
 
+InputFormOfNonStrings::usage = "apply InputForm to non-strings";
+
 StringJoinWithSeparator::usage = "Joins a list of strings with a given separator string";
 
 Zip::usage = "Combines two lists to a list of touples.
@@ -137,6 +139,9 @@ occurrence of the given rule is replaced (if it exists) or added (if
 ForceJoin[elem___] :=
     Join[Sequence @@ Select[{elem}, (Head[#] === List)&]];
 
+InputFormOfNonStrings[a_String] := a;
+InputFormOfNonStrings[a_] := InputForm[a];
+
 End[];
 
 EndPackage[];