Merge pull request #1274 from Shaikh-Ubaid/wasm_modules_initial

Wasm modules initial

Author: ubaidsk

integration_tests/CMakeLists.txt

@@ -197,8 +197,8 @@ RUN(NAME test_dict_03        LABELS cpython llvm)
 RUN(NAME test_dict_04        LABELS cpython llvm)
 RUN(NAME test_dict_05        LABELS cpython llvm)
 RUN(NAME test_for_loop       LABELS cpython llvm c)
-RUN(NAME modules_01          LABELS cpython llvm)
-RUN(NAME modules_02          LABELS cpython llvm)
+RUN(NAME modules_01          LABELS cpython llvm wasm)
+RUN(NAME modules_02          LABELS cpython llvm wasm)
 RUN(NAME test_import_01      LABELS cpython llvm)
 RUN(NAME test_math           LABELS cpython llvm)
 RUN(NAME test_numpy_01       LABELS cpython llvm c)

src/libasr/codegen/asr_to_wasm.cpp

@@ -264,13 +264,11 @@ class ASRToWASMVisitor : public ASR::BaseVisitor<ASRToWASMVisitor> {
                 for (auto &item : build_order) {
                     LFORTRAN_ASSERT(x.m_global_scope->get_scope().find(item) !=
                                     x.m_global_scope->get_scope().end());
-                    if (startswith(item, "lfortran_intrinsic")) {
-                        ASR::symbol_t *mod = x.m_global_scope->get_symbol(item);
-                        if (ASR::is_a<ASR::Module_t>(*mod)) {
-                            ASR::Module_t *m =
-                                ASR::down_cast<ASR::Module_t>(mod);
-                            declare_all_functions(*(m->m_symtab));
-                        }
+                    ASR::symbol_t *mod = x.m_global_scope->get_symbol(item);
+                    if (ASR::is_a<ASR::Module_t>(*mod)) {
+                        ASR::Module_t *m =
+                            ASR::down_cast<ASR::Module_t>(mod);
+                        declare_all_functions(*(m->m_symtab));
                     }
                 }
 
@@ -296,10 +294,8 @@ class ASRToWASMVisitor : public ASR::BaseVisitor<ASRToWASMVisitor> {
             for (auto &item : build_order) {
                 LFORTRAN_ASSERT(x.m_global_scope->get_scope().find(item) !=
                                 x.m_global_scope->get_scope().end());
-                if (startswith(item, "lfortran_intrinsic")) {
-                    ASR::symbol_t *mod = x.m_global_scope->get_symbol(item);
-                    this->visit_symbol(*mod);
-                }
+                ASR::symbol_t *mod = x.m_global_scope->get_symbol(item);
+                this->visit_symbol(*mod);
             }
         }