Make intent_unspecified as default

Author: ubaidsk

src/lpython/semantics/python_ast_to_asr.cpp

@@ -3764,7 +3764,7 @@ class SymbolTableVisitor : public CommonVisitor<SymbolTableVisitor> {
             if (x.m_args.m_args[i].m_annotation == nullptr) {
                 throw SemanticError("Argument does not have a type", loc);
             }
-            ASR::intentType s_intent = ASRUtils::intent_in;
+            ASR::intentType s_intent = ASRUtils::intent_unspecified;
             AST::expr_t* arg_annotation_type = get_var_intent_and_annotation(x.m_args.m_args[i].m_annotation, s_intent);
             ASR::ttype_t *arg_type = ast_expr_to_asr_type(x.base.base.loc, *arg_annotation_type);
             // Set the function as generic if an argument is typed with a type parameter
@@ -3793,8 +3793,11 @@ class SymbolTableVisitor : public CommonVisitor<SymbolTableVisitor> {
             std::string arg_s = arg;
             ASR::expr_t *value = nullptr;
             ASR::expr_t *init_expr = nullptr;
-            if (ASRUtils::is_array(arg_type)) {
-                s_intent = ASRUtils::intent_inout;
+            if (s_intent == ASRUtils::intent_unspecified) {
+                s_intent = ASRUtils::intent_in;
+                if (ASRUtils::is_array(arg_type)) {
+                    s_intent = ASRUtils::intent_inout;
+                }
             }
             ASR::storage_typeType storage_type =
                     ASR::storage_typeType::Default;