Revise Import. Add ZIP import. (#1841)

Start redoing `Import` 
* Add `eval_FindFile` and `eval_FileFormat`. Use these instead of `Expression(...).evaluate`.
* Start handling `ZIP` imports.
* Move `Formats` under `SystemFiles` which is where WMA put this. 
* Start reducing differences in these files; but the files are renamed to `.wl` to avoid confusion with Objective C's `.m` files.

Author: rocky

MANIFEST.in

@@ -1,5 +1,5 @@
 include README.rst
-include CHANGES.rst
+include CHANGES.md
 include ChangeLog
 include COPYING.txt
 include FUTURE.rst

README.rst

@@ -70,5 +70,5 @@ Mathics3 is released under the GNU General Public License Version 3 (GPL3).
 		 :target: https://badge.fury.io/py/Mathics3
 .. |PyPI Installs| image:: https://pepy.tech/badge/Mathics3
 .. |Supported Python Versions| image:: https://img.shields.io/pypi/pyversions/Mathics3.svg
-.. |Packaging status| image:: https://repology.org/badge/vertical-allrepos/mathics.svg
-			    :target: https://repology.org/project/mathics/versions
+.. |Packaging status| image:: https://repology.org/badge/vertical-allrepos/mathics3.svg
+			    :target: https://repology.org/project/mathics3/versions

mathics/autoload/formats/Asy/Export.m mathics/SystemFiles/Formats/Asy/Export.mmathics/autoload/formats/Asy/Export.m renamed to mathics/SystemFiles/Formats/Asy/Export.m

@@ -1,3 +1,4 @@
+(* ::Package:: *)
 
 Begin["System`Convert`B64Dump`"]
 
@@ -21,6 +22,7 @@
 	FunctionChannels -> {"FileNames"},
 	Options -> {"CharacterEncoding", "ByteOrderMark"},
 	DefaultElement -> "Plaintext",
+	Encoding -> True
 	BinaryFormat -> False
 ]
 

mathics/autoload/formats/Base64/Export.m …ics/SystemFiles/Formats/Base64/Export.wlmathics/autoload/formats/Base64/Export.m renamed to mathics/SystemFiles/Formats/Base64/Export.wl mathics/autoload/formats/Base64/Export.m renamed to mathics/SystemFiles/Formats/Base64/Export.wl

@@ -1,3 +1,5 @@
+(* ::Package:: *)
+
 Begin["System`Convert`B64Dump`"]
 
 
@@ -21,6 +23,7 @@
     FunctionChannels -> {"FileNames"},
     AvailableElements -> {"Data"},
     DefaultElement -> "Data",
+    Encoding -> True
     Options -> {
         "CharacterEncoding"
     }

mathics/autoload/formats/Base64/Import.m …ics/SystemFiles/Formats/Base64/Import.wlmathics/autoload/formats/Base64/Import.m renamed to mathics/SystemFiles/Formats/Base64/Import.wl mathics/autoload/formats/Base64/Import.m renamed to mathics/SystemFiles/Formats/Base64/Import.wl

@@ -1,3 +1,5 @@
+(* ::Package:: *)
+
 (* CSV Exporter *)
 
 Begin["System`Convert`TableDump`"]
@@ -8,7 +10,7 @@
 };
 
 CSVExport[strm_OutputStream, data_, OptionsPattern[]]:=
-    Module[{char, wraplist, sep = OptionValue["FieldSeparators"]},        
+    Module[{char, wraplist, sep = OptionValue["FieldSeparators"]},
         If[strm === $Failed, Return[$Failed]];
         wraplist[x_] := If[Head[x] === List, x, {x}];
         char = Map[ToString, wraplist /@ wraplist[data], {2}];
@@ -21,7 +23,7 @@
     System`Convert`TableDump`CSVExport,
     FunctionChannels -> {"Streams"},
     Options -> {"ByteOrderMark"},
-    DefaultElement -> "Plaintext",
+    DefaultElement -> "Data",
     BinaryFormat -> False,
     Options -> {
         "CharacterEncoding",

mathics/autoload/formats/CSV/Export.m mathics/SystemFiles/Formats/CSV/Export.wlmathics/autoload/formats/CSV/Export.m renamed to mathics/SystemFiles/Formats/CSV/Export.wl

@@ -1,3 +1,5 @@
+(* ::Package:: *)
+
 (* CSV Importer *)
 
 Begin["System`Convert`TableDump`"]
@@ -23,12 +25,13 @@
     System`Convert`TableDump`ImportCSV,
     {
         "Data" :> GetData,
-	    "Grid" :> GetGrid
+        "Grid" :> GetGrid
     },
     (* Sources -> ImportExport`DefaultSources["Table"], *)
     FunctionChannels -> {"Streams"},
     AvailableElements -> {"Data", "Grid"},
     DefaultElement -> "Data",
+    BinaryFormat -> False,
     Options -> {
         "CharacterEncoding",
         "FieldSeparators"