Fix errors after ASR changes in variable

Author: Smit-create

src/libasr/pass/pass_compare.cpp

@@ -38,7 +38,7 @@ class CompareExprReplacer : public ASR::BaseExprReplacer<CompareExprReplacer>
     #define create_args(x, type, symtab, vec_exprs) { \
         ASR::symbol_t* arg = ASR::down_cast<ASR::symbol_t>( \
             ASR::make_Variable_t(al, loc, symtab, \
-            s2c(al, x), ASR::intentType::In, nullptr, nullptr, \
+            s2c(al, x), nullptr, 0, ASR::intentType::In, nullptr, nullptr, \
             ASR::storage_typeType::Default, type, \
             ASR::abiType::Source, ASR::accessType::Public, \
             ASR::presenceType::Required, false)); \
@@ -161,7 +161,7 @@ class CompareExprReplacer : public ASR::BaseExprReplacer<CompareExprReplacer>
         // Declare `result`
         ASR::symbol_t* arg = ASR::down_cast<ASR::symbol_t>(
             ASR::make_Variable_t(al, loc, tup_compare_symtab,
-            s2c(al, "result"), ASR::intentType::Local, nullptr, nullptr,
+            s2c(al, "result"), nullptr, 0, ASR::intentType::In, nullptr, nullptr,
             ASR::storage_typeType::Default, bool_type,
             ASR::abiType::Source, ASR::accessType::Public,
             ASR::presenceType::Required, false));
@@ -341,7 +341,7 @@ class CompareExprReplacer : public ASR::BaseExprReplacer<CompareExprReplacer>
         // Declare `result`
         ASR::symbol_t* res_arg = ASR::down_cast<ASR::symbol_t>(
             ASR::make_Variable_t(al, loc, list_compare_symtab,
-            s2c(al, "result"), ASR::intentType::Local, nullptr, nullptr,
+            s2c(al, "result"), nullptr, 0, ASR::intentType::In, nullptr, nullptr,
             ASR::storage_typeType::Default, bool_type,
             ASR::abiType::Source, ASR::accessType::Public,
             ASR::presenceType::Required, false));