@@ -1080,7 +1080,8 @@ class CommonVisitor : public AST::BaseVisitor<StructType> {
10801080 variable_dependencies_vec.size (), ASR::intentType::Local,
10811081 nullptr , nullptr , ASR::storage_typeType::Default,
10821082 type, nullptr , ASR::abiType::Source, ASR::accessType::Public,
1083- ASR::presenceType::Required, false , false , false , nullptr , false );
1083+ ASR::presenceType::Required, false , false , false , nullptr ,
1084+ false ,false );
10841085 ASR::symbol_t * variable_sym = ASR::down_cast<ASR::symbol_t >(variable_asr);
10851086 current_scope->add_symbol (dummy_ret_name, variable_sym);
10861087 ASR::expr_t * variable_var = ASRUtils::EXPR (ASR::make_Var_t (al, expr->base .loc , variable_sym));
@@ -2759,7 +2760,7 @@ class CommonVisitor : public AST::BaseVisitor<StructType> {
27592760 variable_dependencies_vec.size (),
27602761 s_intent, nullptr , nullptr , storage_type, type,
27612762 nullptr , current_procedure_abi_type, s_access,
2762- s_presence, value_attr, false , false , nullptr , false );
2763+ s_presence, value_attr, false , false , nullptr , false , false );
27632764 ASR::symbol_t * v_sym = ASR::down_cast<ASR::symbol_t >(v);
27642765 current_scope->add_or_overwrite_symbol (var_name, v_sym);
27652766 }
@@ -2916,7 +2917,7 @@ class CommonVisitor : public AST::BaseVisitor<StructType> {
29162917 variable_dependencies_vec.size (), ASRUtils::intent_unspecified,
29172918 nullptr , nullptr , ASR::storage_typeType::Default, fn_type->m_arg_types [i],
29182919 nullptr , ASR::abiType::Source, ASR::Public, ASR::presenceType::Required,
2919- false , false , false , nullptr , false ));
2920+ false , false , false , nullptr , false , false ));
29202921 current_scope->add_symbol (arg_name, v);
29212922 LCOMPILERS_ASSERT (v != nullptr )
29222923 args.push_back (al, ASRUtils::EXPR (ASR::make_Var_t (al, x.m_args .m_args [i].loc , v)));
@@ -3515,7 +3516,7 @@ class CommonVisitor : public AST::BaseVisitor<StructType> {
35153516 s2c (al, var_name), variable_dependencies_vec.p ,
35163517 variable_dependencies_vec.size (), s_intent, init_expr,
35173518 value, storage_type, type, nullptr , current_procedure_abi_type,
3518- s_access, s_presence, value_attr, false , false , nullptr , false );
3519+ s_access, s_presence, value_attr, false , false , nullptr , false , false );
35193520 current_scope->add_symbol (var_name, ASR::down_cast<ASR::symbol_t >(v));
35203521 }
35213522
@@ -3545,7 +3546,7 @@ class CommonVisitor : public AST::BaseVisitor<StructType> {
35453546 variable_dependencies_vec.size (),
35463547 s_intent, init_expr, value, storage_type, type, nullptr ,
35473548 current_procedure_abi_type, s_access, s_presence,
3548- value_attr, false , false , nullptr , false );
3549+ value_attr, false , false , nullptr , false , false );
35493550 current_scope->add_symbol (var_name, ASR::down_cast<ASR::symbol_t >(v));
35503551 }
35513552
@@ -4418,6 +4419,7 @@ class SymbolTableVisitor : public CommonVisitor<SymbolTableVisitor> {
44184419 /* a_name */ s2c (al, module_name),
44194420 nullptr ,
44204421 0 ,
4422+ nullptr ,
44214423 false , false );
44224424 module_sym = ASR::down_cast<ASR::Module_t>(ASR::down_cast<ASR::symbol_t >(tmp1));
44234425 parent_scope->add_symbol (module_name, ASR::down_cast<ASR::symbol_t >(tmp1));
@@ -4467,7 +4469,7 @@ class SymbolTableVisitor : public CommonVisitor<SymbolTableVisitor> {
44674469 variable_dependencies_vec.size (), ASRUtils::intent_unspecified,
44684470 nullptr , nullptr , ASR::storage_typeType::Default, func->m_arg_types [i],
44694471 nullptr , ASR::abiType::Source, ASR::Public, ASR::presenceType::Required,
4470- false , false , false , nullptr , false ));
4472+ false , false , false , nullptr , false , false ));
44714473 current_scope->add_symbol (arg_name, v);
44724474 LCOMPILERS_ASSERT (v != nullptr )
44734475 args.push_back (al, ASRUtils::EXPR (ASR::make_Var_t (al, loc,
@@ -4486,7 +4488,7 @@ class SymbolTableVisitor : public CommonVisitor<SymbolTableVisitor> {
44864488 variable_dependencies_vec.size (), ASRUtils::intent_return_var,
44874489 nullptr , nullptr , ASR::storage_typeType::Default, func->m_return_var_type ,
44884490 nullptr , ASR::abiType::Source, ASR::Public, ASR::presenceType::Required,
4489- false , false , false , nullptr , false );
4491+ false , false , false , nullptr , false , false );
44904492 current_scope->add_symbol (return_var_name, ASR::down_cast<ASR::symbol_t >(return_var));
44914493 to_return = ASRUtils::EXPR (ASR::make_Var_t (al, loc,
44924494 ASR::down_cast<ASR::symbol_t >(return_var)));
@@ -4684,6 +4686,7 @@ class SymbolTableVisitor : public CommonVisitor<SymbolTableVisitor> {
46844686 alloc_arg.n_dims = 0 ;
46854687 alloc_arg.m_type = nullptr ;
46864688 alloc_arg.m_len_expr = nullptr ;
4689+ alloc_arg.m_sym_subclass = nullptr ;
46874690 alloc_args.push_back (al, alloc_arg);
46884691 init_expr = ASRUtils::EXPR (ASR::make_Allocate_t (al, loc, alloc_args.p , 1 , nullptr , nullptr , nullptr ));
46894692
@@ -4726,7 +4729,7 @@ class SymbolTableVisitor : public CommonVisitor<SymbolTableVisitor> {
47264729 variable_dependencies_vec.size (),
47274730 s_intent, init_expr, value, storage_type, arg_type,
47284731 nullptr , current_procedure_abi_type, s_access, s_presence,
4729- value_attr, false , false , nullptr , false );
4732+ value_attr, false , false , nullptr , false , false );
47304733 v = ASR::down_cast<ASR::symbol_t >(_tmp);
47314734
47324735 }
@@ -4770,7 +4773,7 @@ class SymbolTableVisitor : public CommonVisitor<SymbolTableVisitor> {
47704773 current_scope, s2c (al, return_var_name), variable_dependencies_vec.p ,
47714774 variable_dependencies_vec.size (), ASRUtils::intent_return_var,
47724775 nullptr , nullptr , storage_type, type, nullptr , current_procedure_abi_type, ASR::Public,
4773- ASR::presenceType::Required, false , false , false , nullptr , false );
4776+ ASR::presenceType::Required, false , false , false , nullptr , false , false );
47744777 LCOMPILERS_ASSERT (current_scope->get_scope ().find (return_var_name) == current_scope->get_scope ().end ())
47754778 current_scope->add_symbol (return_var_name,
47764779 ASR::down_cast<ASR::symbol_t >(return_var));
@@ -5108,7 +5111,7 @@ class SymbolTableVisitor : public CommonVisitor<SymbolTableVisitor> {
51085111 ASR::asr_t *v = ASR::make_Variable_t (al, x.base .base .loc , current_scope,
51095112 s2c (al, tvar_name), variable_dependencies_vec.p , variable_dependencies_vec.size (),
51105113 s_intent, init_expr, value, storage_type, type, nullptr , current_procedure_abi_type,
5111- s_access, s_presence, value_attr, false , false , nullptr , false );
5114+ s_access, s_presence, value_attr, false , false , nullptr , false , false );
51125115 current_scope->add_symbol (tvar_name, ASR::down_cast<ASR::symbol_t >(v));
51135116
51145117 tmp = nullptr ;
@@ -5868,7 +5871,7 @@ class BodyVisitor : public CommonVisitor<BodyVisitor> {
58685871 variable_dependencies_vec.p , variable_dependencies_vec.size (),
58695872 ASR::intentType::Local, nullptr , nullptr , storage_type,
58705873 int_type, nullptr , ASR::abiType::Source, ASR::accessType::Public,
5871- ASR::presenceType::Required, false , false , false , nullptr , false
5874+ ASR::presenceType::Required, false , false , false , nullptr , false , false
58725875 );
58735876 current_scope->add_symbol (explicit_iter_name,
58745877 ASR::down_cast<ASR::symbol_t >(explicit_iter_variable));
@@ -6075,7 +6078,7 @@ class BodyVisitor : public CommonVisitor<BodyVisitor> {
60756078 s2c (al, tmp_assign_name), variable_dependencies_vec.p , variable_dependencies_vec.size (),
60766079 ASR::intentType::Local, nullptr , nullptr , ASR::storage_typeType::Default,
60776080 loop_src_var_ttype, nullptr , ASR::abiType::Source, ASR::accessType::Public,
6078- ASR::presenceType::Required, false , false , false , nullptr , false
6081+ ASR::presenceType::Required, false , false , false , nullptr , false , false
60796082 );
60806083 ASR::symbol_t *tmp_assign_variable_sym = ASR::down_cast<ASR::symbol_t >(tmp_assign_variable);
60816084 current_scope->add_symbol (tmp_assign_name, tmp_assign_variable_sym);
@@ -6113,7 +6116,7 @@ class BodyVisitor : public CommonVisitor<BodyVisitor> {
61136116 s2c (al, tmp_assign_name), variable_dependencies_vec.p , variable_dependencies_vec.size (),
61146117 ASR::intentType::Local, nullptr , nullptr , ASR::storage_typeType::Default,
61156118 loop_src_var_ttype, nullptr , ASR::abiType::Source, ASR::accessType::Public,
6116- ASR::presenceType::Required, false , false , false , nullptr , false
6119+ ASR::presenceType::Required, false , false , false , nullptr , false , false
61176120 );
61186121 ASR::symbol_t *tmp_assign_variable_sym = ASR::down_cast<ASR::symbol_t >(tmp_assign_variable);
61196122 current_scope->add_symbol (tmp_assign_name, tmp_assign_variable_sym);
@@ -8791,6 +8794,7 @@ we will have to use something else.
87918794 new_arg.m_dims = dims.p ;
87928795 new_arg.n_dims = dims.size ();
87938796 new_arg.m_a = assign_asr_target;
8797+ new_arg.m_sym_subclass = nullptr ;
87948798 alloc_args_vec.push_back (al, new_arg);
87958799 tmp = ASR::make_Allocate_t (al, loc,
87968800 alloc_args_vec.p , alloc_args_vec.size (),
0 commit comments