Removed extra code and fixed issue with bad reference within #AssignG…

…lobal
petrowsky · Nov 19, 2015 · 4067354 · 4067354
1 parent b2e6c86
commit 4067354
Show file tree

Hide file tree

Showing 2 changed files with 1 addition and 5 deletions.
diff --git a/Functions/#Name-Value/#Assign.fmfn b/Functions/#Name-Value/#Assign.fmfn
@@ -33,8 +33,6 @@
 
 Let ( [
 	~semiCount = PatternCount ( parameters ; ";¶" );
-	~rowCount = ValueCount ( parameters );
-	~validFormat = ~semiCount = ~rowCount;
 	~variables = Case (
 		~semiCount = 0 and not IsEmpty ( parameters );
 			Substitute ( parameters ; ¶ ; ";¶" ) & ";";

diff --git a/Functions/#Name-Value/#AssignGlobal.fmfn b/Functions/#Name-Value/#AssignGlobal.fmfn
@@ -27,8 +27,6 @@
 
 Let ( [
 	~semiCount = PatternCount ( parameters ; ";¶" );
-	~rowCount = ValueCount ( parameters );
-	~validFormat = ~semiCount = ~rowCount;
 	~variables = Case (
 		~semiCount = 0 and not IsEmpty ( parameters );
 			Substitute ( parameters ; ¶ ; ";¶" ) & ";";
@@ -39,7 +37,7 @@ Let ( [
 		EvaluationError ( Evaluate (
 			"Let ( ["
 			& Substitute (	// convert $local to $$GLOBAL variables
-				¶ & parameters;
+				¶ & ~variables;
 				[ "¶$$" ; "¶$" ];	// ... without renaming existing $$GLOBALS
 				[ "¶$" ; "¶$$" ]
 			)