Erase \r in the string read from the file

Author: Thirumalai-Shaktivel

src/libasr/string_utils.cpp

@@ -99,7 +99,9 @@ std::string read_file(const std::string &filename)
     std::vector<char> bytes(filesize);
     ifs.read(&bytes[0], filesize);
 
-    return std::string(&bytes[0], filesize);
+    std::string s(&bytes[0], filesize);
+    s.erase( std::remove(s.begin(), s.end(), '\r'), s.end() );
+    return s;
 }
 
 std::string parent_path(const std::string &path) {

src/libasr/utils2.cpp

@@ -25,6 +25,7 @@ bool read_file(const std::string &filename, std::string &text)
     ifs.read(&bytes[0], filesize);
 
     text = std::string(&bytes[0], filesize);
+    text.erase( std::remove(text.begin(), text.end(), '\r'), text.end() );
     return true;
 }