public inbox for gcc-bugs@sourceware.org
help / color / mirror / Atom feed
* [Bug fortran/40996]  New: [F03] ALLOCATABLE scalars
@ 2009-08-07  9:14 janus at gcc dot gnu dot org
  2009-08-07 11:23 ` [Bug fortran/40996] " janus at gcc dot gnu dot org
                   ` (9 more replies)
  0 siblings, 10 replies; 11+ messages in thread
From: janus at gcc dot gnu dot org @ 2009-08-07  9:14 UTC (permalink / raw)
  To: gcc-bugs

The ALLOCATABLE attribute was only allowed for arrays in F95, but F03 also
allows allocatable scalars (which will be useful for polymorphism).

Simple example:

real, allocatable :: scalar
allocate(scalar)
scalar = exp(1.)
print *,scalar
deallocate(scalar)
end


With current trunk you get:

as.f90:1.27:

real, allocatable :: scalar
                           1
Error: Scalar object 'scalar' at (1) may not be ALLOCATABLE
as.f90:2.9:

allocate(scalar)
         1
Error: Array specification required in ALLOCATE statement at (1)


-- 
           Summary: [F03] ALLOCATABLE scalars
           Product: gcc
           Version: 4.5.0
            Status: UNCONFIRMED
          Keywords: rejects-valid
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: janus at gcc dot gnu dot org


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40996


^ permalink raw reply	[flat|nested] 11+ messages in thread

* [Bug fortran/40996] [F03] ALLOCATABLE scalars
  2009-08-07  9:14 [Bug fortran/40996] New: [F03] ALLOCATABLE scalars janus at gcc dot gnu dot org
@ 2009-08-07 11:23 ` janus at gcc dot gnu dot org
  2009-08-07 11:48 ` burnus at gcc dot gnu dot org
                   ` (8 subsequent siblings)
  9 siblings, 0 replies; 11+ messages in thread
From: janus at gcc dot gnu dot org @ 2009-08-07 11:23 UTC (permalink / raw)
  To: gcc-bugs



------- Comment #1 from janus at gcc dot gnu dot org  2009-08-07 11:22 -------
The following is enough to make the test case work:

Index: gcc/fortran/resolve.c
===================================================================
--- gcc/fortran/resolve.c       (revision 150529)
+++ gcc/fortran/resolve.c       (working copy)
@@ -5591,7 +5591,7 @@
       code->next = init_st;
     }

-  if (pointer && dimension == 0)
+  if (pointer || dimension == 0)
     return SUCCESS;

   /* Make sure the next-to-last reference node is an array specification.  */
@@ -7883,15 +7883,11 @@
   /* Constraints on deferred shape variable.  */
   if (sym->as == NULL || sym->as->type != AS_DEFERRED)
     {
-      if (sym->attr.allocatable)
+      if (sym->attr.allocatable && sym->attr.dimension)
        {
-         if (sym->attr.dimension)
-           gfc_error ("Allocatable array '%s' at %L must have "
-                      "a deferred shape", sym->name, &sym->declared_at);
-         else
-           gfc_error ("Scalar object '%s' at %L may not be ALLOCATABLE",
-                      sym->name, &sym->declared_at);
-           return FAILURE;
+         gfc_error ("Allocatable array '%s' at %L must have a deferred shape",
+                    sym->name, &sym->declared_at);
+         return FAILURE;
        }

       if (sym->attr.pointer && sym->attr.dimension)


-- 

janus at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
         AssignedTo|unassigned at gcc dot gnu   |janus at gcc dot gnu dot org
                   |dot org                     |
             Status|UNCONFIRMED                 |ASSIGNED
     Ever Confirmed|0                           |1
   Last reconfirmed|0000-00-00 00:00:00         |2009-08-07 11:22:57
               date|                            |


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40996


^ permalink raw reply	[flat|nested] 11+ messages in thread

* [Bug fortran/40996] [F03] ALLOCATABLE scalars
  2009-08-07  9:14 [Bug fortran/40996] New: [F03] ALLOCATABLE scalars janus at gcc dot gnu dot org
  2009-08-07 11:23 ` [Bug fortran/40996] " janus at gcc dot gnu dot org
@ 2009-08-07 11:48 ` burnus at gcc dot gnu dot org
  2009-08-07 11:54 ` janus at gcc dot gnu dot org
                   ` (7 subsequent siblings)
  9 siblings, 0 replies; 11+ messages in thread
From: burnus at gcc dot gnu dot org @ 2009-08-07 11:48 UTC (permalink / raw)
  To: gcc-bugs



------- Comment #2 from burnus at gcc dot gnu dot org  2009-08-07 11:48 -------
Of cause, you need to add a -std=f95 check - and one should do some
thinking/testing whether other items are missing.

There are some other related issues, which should be handled separately:
- Allocate on assignment (which only works for derived types and even there not
completely; cf. PR 35810)
- Allocatable character lengths (Steve K. works on this)


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40996


^ permalink raw reply	[flat|nested] 11+ messages in thread

* [Bug fortran/40996] [F03] ALLOCATABLE scalars
  2009-08-07  9:14 [Bug fortran/40996] New: [F03] ALLOCATABLE scalars janus at gcc dot gnu dot org
  2009-08-07 11:23 ` [Bug fortran/40996] " janus at gcc dot gnu dot org
  2009-08-07 11:48 ` burnus at gcc dot gnu dot org
@ 2009-08-07 11:54 ` janus at gcc dot gnu dot org
  2009-08-07 12:11 ` janus at gcc dot gnu dot org
                   ` (6 subsequent siblings)
  9 siblings, 0 replies; 11+ messages in thread
From: janus at gcc dot gnu dot org @ 2009-08-07 11:54 UTC (permalink / raw)
  To: gcc-bugs



------- Comment #3 from janus at gcc dot gnu dot org  2009-08-07 11:54 -------
(In reply to comment #2)
> and one should do some thinking/testing whether other items are missing.

One things which is missing is the ALLOCATED intrinsic. Working on it ...


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40996


^ permalink raw reply	[flat|nested] 11+ messages in thread

* [Bug fortran/40996] [F03] ALLOCATABLE scalars
  2009-08-07  9:14 [Bug fortran/40996] New: [F03] ALLOCATABLE scalars janus at gcc dot gnu dot org
                   ` (2 preceding siblings ...)
  2009-08-07 11:54 ` janus at gcc dot gnu dot org
@ 2009-08-07 12:11 ` janus at gcc dot gnu dot org
  2009-08-31 10:23 ` janus at gcc dot gnu dot org
                   ` (5 subsequent siblings)
  9 siblings, 0 replies; 11+ messages in thread
From: janus at gcc dot gnu dot org @ 2009-08-07 12:11 UTC (permalink / raw)
  To: gcc-bugs



------- Comment #4 from janus at gcc dot gnu dot org  2009-08-07 12:11 -------
(In reply to comment #3)
> > and one should do some thinking/testing whether other items are missing.
> 
> One things which is missing is the ALLOCATED intrinsic. Working on it ...

Also: allocatable scalar components


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40996


^ permalink raw reply	[flat|nested] 11+ messages in thread

* [Bug fortran/40996] [F03] ALLOCATABLE scalars
  2009-08-07  9:14 [Bug fortran/40996] New: [F03] ALLOCATABLE scalars janus at gcc dot gnu dot org
                   ` (3 preceding siblings ...)
  2009-08-07 12:11 ` janus at gcc dot gnu dot org
@ 2009-08-31 10:23 ` janus at gcc dot gnu dot org
  2009-08-31 10:36 ` janus at gcc dot gnu dot org
                   ` (4 subsequent siblings)
  9 siblings, 0 replies; 11+ messages in thread
From: janus at gcc dot gnu dot org @ 2009-08-31 10:23 UTC (permalink / raw)
  To: gcc-bugs



------- Comment #5 from janus at gcc dot gnu dot org  2009-08-31 10:22 -------
Subject: Bug 40996

Author: janus
Date: Mon Aug 31 10:22:32 2009
New Revision: 151240

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=151240
Log:
2009-08-31  Janus Weil  <janus@gcc.gnu.org>

        PR fortran/40996
        * check.c (gfc_check_allocated): Implement allocatable scalars.
        * resolve.c (resolve_allocate_expr,resolve_fl_var_and_proc): Ditto.
        * trans-intrinsic.c (gfc_conv_allocated): Ditto.

2009-08-31  Janus Weil  <janus@gcc.gnu.org>

        PR fortran/40996
        * gfortran.dg/allocatable_scalar_1.f90: New.
        * gfortran.dg/allocatable_scalar_2.f90: Renamed from finalize_9.f03.
        * gfortran.dg/finalize_9.f03: Renamed to allocatable_scalar_2.f90.
        * gfortran.dg/proc_ptr_comp_pass_4.f90: Modified.


Added:
    trunk/gcc/testsuite/gfortran.dg/allocatable_scalar_1.f90
    trunk/gcc/testsuite/gfortran.dg/allocatable_scalar_2.f90   (contents, props
changed)
      - copied, changed from r151238,
trunk/gcc/testsuite/gfortran.dg/finalize_9.f03
Removed:
    trunk/gcc/testsuite/gfortran.dg/finalize_9.f03
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/check.c
    trunk/gcc/fortran/resolve.c
    trunk/gcc/fortran/trans-intrinsic.c
    trunk/gcc/testsuite/ChangeLog
    trunk/gcc/testsuite/gfortran.dg/proc_ptr_comp_pass_4.f90

Propchange: trunk/gcc/testsuite/gfortran.dg/allocatable_scalar_2.f90
            ('svn:mergeinfo' added)


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40996


^ permalink raw reply	[flat|nested] 11+ messages in thread

* [Bug fortran/40996] [F03] ALLOCATABLE scalars
  2009-08-07  9:14 [Bug fortran/40996] New: [F03] ALLOCATABLE scalars janus at gcc dot gnu dot org
                   ` (4 preceding siblings ...)
  2009-08-31 10:23 ` janus at gcc dot gnu dot org
@ 2009-08-31 10:36 ` janus at gcc dot gnu dot org
  2009-09-22 11:40 ` janus at gcc dot gnu dot org
                   ` (3 subsequent siblings)
  9 siblings, 0 replies; 11+ messages in thread
From: janus at gcc dot gnu dot org @ 2009-08-31 10:36 UTC (permalink / raw)
  To: gcc-bugs



------- Comment #6 from janus at gcc dot gnu dot org  2009-08-31 10:36 -------
r151240 implements basic allocatable scalars. Allocatable scalar components are
still missing.


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40996


^ permalink raw reply	[flat|nested] 11+ messages in thread

* [Bug fortran/40996] [F03] ALLOCATABLE scalars
  2009-08-07  9:14 [Bug fortran/40996] New: [F03] ALLOCATABLE scalars janus at gcc dot gnu dot org
                   ` (5 preceding siblings ...)
  2009-08-31 10:36 ` janus at gcc dot gnu dot org
@ 2009-09-22 11:40 ` janus at gcc dot gnu dot org
  2009-09-30 19:56 ` burnus at gcc dot gnu dot org
                   ` (2 subsequent siblings)
  9 siblings, 0 replies; 11+ messages in thread
From: janus at gcc dot gnu dot org @ 2009-09-22 11:40 UTC (permalink / raw)
  To: gcc-bugs



------- Comment #7 from janus at gcc dot gnu dot org  2009-09-22 11:40 -------
Subject: Bug 40996

Author: janus
Date: Tue Sep 22 11:40:30 2009
New Revision: 151975

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=151975
Log:
2009-09-22  Janus Weil  <janus@gcc.gnu.org>

        PR fortran/40996
        * decl.c (build_struct): Handle allocatable scalar components.
        * expr.c (gfc_add_component_ref): Correctly set typespec of expression,
        after inserting component reference.
        * match.c (gfc_match_type_is,gfc_match_class_is): Make sure that no
        variables are being used uninitialized.
        * primary.c (gfc_match_varspec): Handle CLASS array components.
        * resolve.c (resolve_select_type): Transform EXEC_SELECT_TYPE to
        EXEC_SELECT.
        * trans-array.c (structure_alloc_comps,gfc_trans_deferred_array):
        Handle allocatable scalar components.
        * trans-expr.c (gfc_conv_component_ref): Ditto.
        * trans-types.c (gfc_get_derived_type): Ditto.


2009-09-22  Janus Weil  <janus@gcc.gnu.org>

        PR fortran/40996
        * gfortran.dg/allocatable_scalar_3.f90: New test.
        * gfortran.dg/select_type_2.f03: Ditto.
        * gfortran.dg/typebound_proc_5.f03: Changed error messages.

Added:
    branches/fortran-dev/gcc/testsuite/gfortran.dg/allocatable_scalar_3.f90
    branches/fortran-dev/gcc/testsuite/gfortran.dg/select_type_2.f03
Modified:
    branches/fortran-dev/gcc/fortran/ChangeLog.fortran-dev
    branches/fortran-dev/gcc/fortran/decl.c
    branches/fortran-dev/gcc/fortran/expr.c
    branches/fortran-dev/gcc/fortran/match.c
    branches/fortran-dev/gcc/fortran/primary.c
    branches/fortran-dev/gcc/fortran/resolve.c
    branches/fortran-dev/gcc/fortran/trans-array.c
    branches/fortran-dev/gcc/fortran/trans-expr.c
    branches/fortran-dev/gcc/fortran/trans-types.c
    branches/fortran-dev/gcc/testsuite/ChangeLog.fortran-dev
    branches/fortran-dev/gcc/testsuite/gfortran.dg/typebound_proc_5.f03


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40996


^ permalink raw reply	[flat|nested] 11+ messages in thread

* [Bug fortran/40996] [F03] ALLOCATABLE scalars
  2009-08-07  9:14 [Bug fortran/40996] New: [F03] ALLOCATABLE scalars janus at gcc dot gnu dot org
                   ` (6 preceding siblings ...)
  2009-09-22 11:40 ` janus at gcc dot gnu dot org
@ 2009-09-30 19:56 ` burnus at gcc dot gnu dot org
  2009-10-02 19:33 ` burnus at gcc dot gnu dot org
  2009-10-02 22:24 ` janus at gcc dot gnu dot org
  9 siblings, 0 replies; 11+ messages in thread
From: burnus at gcc dot gnu dot org @ 2009-09-30 19:56 UTC (permalink / raw)
  To: gcc-bugs



------- Comment #8 from burnus at gcc dot gnu dot org  2009-09-30 19:56 -------
Subject: Bug 40996

Author: burnus
Date: Wed Sep 30 19:55:45 2009
New Revision: 152345

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=152345
Log:
fortran/
2009-09-30  Janus Weil  <janus@gcc.gnu.org>

        * check.c (gfc_check_same_type_as): New function for checking
        SAME_TYPE_AS and EXTENDS_TYPE_OF.
        * decl.c (encapsulate_class_symbol): Set ABSTRACT attribute for class
        container, if the contained type has it. Add an initializer for the
        class container.
        (add_init_expr_to_sym): Handle BT_CLASS.
        (vindex_counter): New counter for setting vindices.
        (gfc_match_derived_decl): Set vindex for all derived types, not only
        those which are being extended.
        * expr.c (gfc_check_assign_symbol): Handle NULL initialization of class
        pointers.
        * gfortran.h (gfc_isym_id): New values GFC_ISYM_SAME_TYPE_AS and
        GFC_ISYM_EXTENDS_TYPE_OF.
        (gfc_type_is_extensible): New prototype.
        * intrinsic.h (gfc_check_same_type_as): New prototype.
        * intrinsic.c (add_functions): Add SAME_TYPE_AS and EXTENDS_TYPE_OF.
        * primary.c (gfc_expr_attr): Handle CLASS-valued functions.
        * resolve.c (resolve_structure_cons): Handle BT_CLASS.
        (type_is_extensible): Make non-static and rename to
        'gfc_type_is_extensible.
        (resolve_select_type): Renamed type_is_extensible.
        (resolve_class_assign): Handle NULL pointers.
        (resolve_fl_variable_derived): Renamed type_is_extensible.
        (resolve_fl_derived): Ditto.
        * trans-expr.c (gfc_trans_subcomponent_assign): Handle NULL
        initialization of class pointer components.
        (gfc_conv_structure): Handle BT_CLASS.
        * trans-intrinsic.c (gfc_conv_same_type_as,gfc_conv_extends_type_of):
        New functions.
        (gfc_conv_intrinsic_function): Handle SAME_TYPE_AS and EXTENDS_TYPE_OF.

2009-09-30  Janus Weil  <janus@gcc.gnu.org>

        * gfortran.h (type_selector, select_type_tmp): New global variables.
        * match.c (type_selector, select_type_tmp): New global variables,
        used for SELECT TYPE statements.
        (gfc_match_select_type): Better error handling. Remember selector.
        (gfc_match_type_is): Create temporary variable.
        * module.c (ab_attribute): New value 'AB_IS_CLASS'.
        (attr_bits): New string.
        (mio_symbol_attribute): Handle 'is_class'.
        * resolve.c (resolve_select_type): Insert pointer assignment statement,
        to assign temporary to selector.
        * symbol.c (gfc_get_ha_sym_tree): Replace selector by a temporary
        in SELECT TYPE statements.

2009-09-30  Janus Weil  <janus@gcc.gnu.org>

        * dump-parse-tree.c (show_code_node): Renamed 'alloc_list'.
        * gfortran.h (gfc_code): Rename 'alloc_list'. Add member 'ts'.
        (gfc_expr_to_initialize): New prototype.
        * match.c (alloc_opt_list): Correctly check type compatibility.
        Renamed 'alloc_list'.
        (dealloc_opt_list): Renamed 'alloc_list'.
        * resolve.c (expr_to_initialize): Rename to 'gfc_expr_to_initialize'
        and make it non-static.
        (resolve_allocate_expr): Set vindex for CLASS variables correctly.
        Move initialization code to gfc_trans_allocate. Renamed 'alloc_list'.
        (resolve_allocate_deallocate): Renamed 'alloc_list'.
        (check_class_pointer_assign): Rename to 'resolve_class_assign'. Change
        argument type. Adjust to work with ordinary assignments.
        (resolve_code): Call 'resolve_class_assign' for ordinary assignments.
        Renamed 'check_class_pointer_assign'.
        * st.c (gfc_free_statement): Renamed 'alloc_list'.
        * trans-stmt.c (gfc_trans_allocate): Renamed 'alloc_list'. Handle
        size determination and initialization of CLASS variables. Bugfix for
        ALLOCATE statements with default initialization and SOURCE block.
        (gfc_trans_deallocate): Renamed 'alloc_list'.

2009-09-30  Paul Thomas  <pault@gcc.gnu.org>

        * trans-expr.c (gfc_conv_procedure_call): Convert a derived
        type actual to a class object if the formal argument is a
        class.

2009-09-30  Janus Weil  <janus@gcc.gnu.org>

        PR fortran/40996
        * decl.c (build_struct): Handle allocatable scalar components.
        * expr.c (gfc_add_component_ref): Correctly set typespec of expression,
        after inserting component reference.
        * match.c (gfc_match_type_is,gfc_match_class_is): Make sure that no
        variables are being used uninitialized.
        * primary.c (gfc_match_varspec): Handle CLASS array components.
        * resolve.c (resolve_select_type): Transform EXEC_SELECT_TYPE to
        EXEC_SELECT.
        * trans-array.c (structure_alloc_comps,gfc_trans_deferred_array):
        Handle allocatable scalar components.
        * trans-expr.c (gfc_conv_component_ref): Ditto.
        * trans-types.c (gfc_get_derived_type): Ditto.

2009-09-30  Janus Weil  <janus@gcc.gnu.org>

        * decl.c (encapsulate_class_symbol): Modify names of class container
        components by prefixing with '$'.
        (gfc_match_end): Handle COMP_SELECT_TYPE.
        * expr.c (gfc_add_component_ref): Modify names of class container
        components by prefixing with '$'.
        * gfortran.h (gfc_statement): Add ST_SELECT_TYPE, ST_TYPE_IS and
        ST_CLASS_IS.
        (gfc_case): New field 'ts'.
        (gfc_exec_op): Add EXEC_SELECT_TYPE.
        (gfc_type_is_extension_of): New prototype.
        * match.h (gfc_match_select_type,gfc_match_type_is,gfc_match_class_is):
        New prototypes.
        * match.c (match_derived_type_spec): New function.
        (match_type_spec): Use 'match_derived_type_spec'.
        (match_case_eos): Modify error message.
        (gfc_match_select_type): New function.
        (gfc_match_case): Modify error message.
        (gfc_match_type_is): New function.
        (gfc_match_class_is): Ditto.
        * parse.h (gfc_compile_state): Add COMP_SELECT_TYPE.
        * parse.c (decode_statement): Handle SELECT TYPE, TYPE IS and CLASS IS
        statements.
        (next_statement): Handle ST_SELECT_TYPE.
        (gfc_ascii_statement): Handle ST_SELECT_TYPE, ST_TYPE_IS, ST_CLASS_IS.
        (parse_select_type_block): New function.
        (parse_executable): Handle ST_SELECT_TYPE.
        * resolve.c (resolve_deallocate_expr): Handle BT_CLASS. Modify names of
        class container components by prefixing with '$'.
        (resolve_allocate_expr): Ditto.
        (resolve_select_type): New function.
        (gfc_resolve_blocks): Handle EXEC_SELECT_TYPE.
        (check_class_pointer_assign): Modify names of class container
        components by prefixing with '$'.
        (resolve_code): Ditto.
        * st.c (gfc_free_statement): Ditto.
        * symbol.c (gfc_type_is_extension_of): New function.
        (gfc_type_compatible): Use 'gfc_type_is_extension_of', plus a bugfix.
        * trans.c (gfc_trans_code): Handel EXEC_SELECT_TYPE.

2009-09-30  Janus Weil  <janus@gcc.gnu.org>
            Paul Thomas <pault@gcc.gnu.org> 

        * check.c (gfc_check_move_alloc): Arguments don't have to be arrays.
        The second argument needs to be type-compatible with the first (not the
        other way around, which makes a difference for CLASS entities).
        * decl.c (encapsulate_class_symbol): New function.
        (build_sym,build_struct): Handle BT_CLASS, call
        'encapsulate_class_symbol'.
        (gfc_match_decl_type_spec): Remove warning, use BT_CLASS.
        (gfc_match_derived_decl): Set vindex;
        * expr.c (gfc_add_component_ref): New function.
        (gfc_copy_expr,gfc_check_pointer_assign,gfc_check_assign_symbol):
        Handle BT_CLASS.
        * dump-parse-tree.c (show_symbol): Print vindex.
        * gfortran.h (bt): New basic type BT_CLASS.
        (symbol_attribute): New field 'is_class'.
        (gfc_typespec): Remove field 'is_class'.
        (gfc_symbol): New field 'vindex'.
        (gfc_get_ultimate_derived_super_type): New prototype.
        (gfc_add_component_ref): Ditto.
        * interface.c (gfc_compare_derived_types): Pointer equality check
        moved here from gfc_compare_types.
        (gfc_compare_types): Handle BT_CLASS and use
        gfc_type_compatible.
        * match.c (gfc_match_allocate,gfc_match_deallocate,gfc_match_call):
        Handle BT_CLASS.
        * misc.c (gfc_clear_ts): Removed is_class.
        (gfc_basic_typename,gfc_typename): Handle BT_CLASS.
        * module.c (bt_types,mio_typespec): Handle BT_CLASS.
        (mio_symbol): Handle vindex.
        * primary.c (gfc_match_varspec,gfc_variable_attr): Handle BT_CLASS.
        * resolve.c (find_array_spec,check_typebound_baseobject):
        Handle BT_CLASS.
        (resolve_ppc_call,resolve_expr_ppc): Don't call 'gfc_is_proc_ptr_comp'
        inside 'gcc_assert'.
        (resolve_deallocate_expr,resolve_allocate_expr): Handle BT_CLASS.
        (check_class_pointer_assign): New function.
        (resolve_code): Handle BT_CLASS, call check_class_pointer_assign.
       
(resolve_fl_var_and_proc,type_is_extensible,resolve_fl_variable_derived,
        resolve_fl_variable): Handle BT_CLASS.
        (check_generic_tbp_ambiguity): Add special case.
        (resolve_typebound_procedure,resolve_fl_derived): Handle BT_CLASS.
        * symbol.c (gfc_get_ultimate_derived_super_type): New function.
        (gfc_type_compatible): Handle BT_CLASS.
        * trans-expr.c (conv_parent_component_references): Handle CLASS
        containers.
        (gfc_conv_initializer): Handle BT_CLASS.
        * trans-types.c (gfc_typenode_for_spec,gfc_get_derived_type):
        Handle BT_CLASS.

testsuite/
2009-09-30  Janus Weil  <janus@gcc.gnu.org>

        * gfortran.dg/same_type_as_1.f03: New test.
        * gfortran.dg/same_type_as_2.f03: Ditto.

2009-09-30  Janus Weil  <janus@gcc.gnu.org>

        * gfortran.dg/select_type_1.f03: Extended.
        * gfortran.dg/select_type_3.f03: New test.

2009-09-30  Janus Weil  <janus@gcc.gnu.org>

        * gfortran.dg/class_allocate_1.f03: New test.

2009-09-30  Janus Weil  <janus@gcc.gnu.org>

        PR fortran/40996
        * gfortran.dg/allocatable_scalar_3.f90: New test.
        * gfortran.dg/select_type_2.f03: Ditto.
        * gfortran.dg/typebound_proc_5.f03: Changed error messages.

2009-09-30  Janus Weil  <janus@gcc.gnu.org>

        * gfortran.dg/block_name_2.f90: Modified error message.
        * gfortran.dg/select_6.f90: Ditto.
        * gfortran.dg/select_type_1.f03: New test.

2009-09-30  Janus Weil  <janus@gcc.gnu.org>

        * gfortran.dg/allocate_derived_1.f90: Remove -w option.
        * gfortran.dg/class_1.f03: Ditto.
        * gfortran.dg/class_2.f03: Ditto.
        * gfortran.dg/proc_ptr_comp_pass_1.f90: Ditto.
        * gfortran.dg/proc_ptr_comp_pass_2.f90: Ditto.
        * gfortran.dg/proc_ptr_comp_pass_3.f90: Ditto.
        * gfortran.dg/typebound_call_10.f03: Ditto.
        * gfortran.dg/typebound_call_2.f03: Ditto.
        * gfortran.dg/typebound_call_3.f03: Ditto.
        * gfortran.dg/typebound_call_4.f03: Ditto.
        * gfortran.dg/typebound_call_9.f03: Ditto.
        * gfortran.dg/typebound_generic_3.f03: Ditto.
        * gfortran.dg/typebound_generic_4.f03: Ditto.
        * gfortran.dg/typebound_operator_1.f03: Ditto.
        * gfortran.dg/typebound_operator_2.f03: Ditto.
        * gfortran.dg/typebound_operator_3.f03: Ditto.
        * gfortran.dg/typebound_operator_4.f03: Ditto.
        * gfortran.dg/typebound_proc_1.f08: Ditto.
        * gfortran.dg/typebound_proc_5.f03: Ditto.
        * gfortran.dg/typebound_proc_6.f03: Ditto.


Added:
    trunk/gcc/testsuite/gfortran.dg/allocatable_scalar_3.f90
    trunk/gcc/testsuite/gfortran.dg/class_allocate_1.f03
    trunk/gcc/testsuite/gfortran.dg/same_type_as_1.f03
    trunk/gcc/testsuite/gfortran.dg/same_type_as_2.f03
    trunk/gcc/testsuite/gfortran.dg/select_type_1.f03
    trunk/gcc/testsuite/gfortran.dg/select_type_2.f03
    trunk/gcc/testsuite/gfortran.dg/select_type_3.f03
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/check.c
    trunk/gcc/fortran/decl.c
    trunk/gcc/fortran/dump-parse-tree.c
    trunk/gcc/fortran/expr.c
    trunk/gcc/fortran/gfortran.h
    trunk/gcc/fortran/interface.c
    trunk/gcc/fortran/intrinsic.c
    trunk/gcc/fortran/intrinsic.h
    trunk/gcc/fortran/match.c
    trunk/gcc/fortran/match.h
    trunk/gcc/fortran/misc.c
    trunk/gcc/fortran/module.c
    trunk/gcc/fortran/parse.c
    trunk/gcc/fortran/parse.h
    trunk/gcc/fortran/primary.c
    trunk/gcc/fortran/resolve.c
    trunk/gcc/fortran/st.c
    trunk/gcc/fortran/symbol.c
    trunk/gcc/fortran/trans-array.c
    trunk/gcc/fortran/trans-expr.c
    trunk/gcc/fortran/trans-intrinsic.c
    trunk/gcc/fortran/trans-stmt.c
    trunk/gcc/fortran/trans-types.c
    trunk/gcc/fortran/trans.c
    trunk/gcc/testsuite/ChangeLog
    trunk/gcc/testsuite/gfortran.dg/allocate_derived_1.f90
    trunk/gcc/testsuite/gfortran.dg/block_name_2.f90
    trunk/gcc/testsuite/gfortran.dg/class_1.f03
    trunk/gcc/testsuite/gfortran.dg/class_2.f03
    trunk/gcc/testsuite/gfortran.dg/proc_ptr_comp_pass_1.f90
    trunk/gcc/testsuite/gfortran.dg/proc_ptr_comp_pass_2.f90
    trunk/gcc/testsuite/gfortran.dg/proc_ptr_comp_pass_3.f90
    trunk/gcc/testsuite/gfortran.dg/select_6.f90
    trunk/gcc/testsuite/gfortran.dg/typebound_call_10.f03
    trunk/gcc/testsuite/gfortran.dg/typebound_call_2.f03
    trunk/gcc/testsuite/gfortran.dg/typebound_call_3.f03
    trunk/gcc/testsuite/gfortran.dg/typebound_call_4.f03
    trunk/gcc/testsuite/gfortran.dg/typebound_call_9.f03
    trunk/gcc/testsuite/gfortran.dg/typebound_generic_3.f03
    trunk/gcc/testsuite/gfortran.dg/typebound_generic_4.f03
    trunk/gcc/testsuite/gfortran.dg/typebound_operator_1.f03
    trunk/gcc/testsuite/gfortran.dg/typebound_operator_2.f03
    trunk/gcc/testsuite/gfortran.dg/typebound_operator_3.f03
    trunk/gcc/testsuite/gfortran.dg/typebound_operator_4.f03
    trunk/gcc/testsuite/gfortran.dg/typebound_proc_1.f08
    trunk/gcc/testsuite/gfortran.dg/typebound_proc_5.f03
    trunk/gcc/testsuite/gfortran.dg/typebound_proc_6.f03


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40996


^ permalink raw reply	[flat|nested] 11+ messages in thread

* [Bug fortran/40996] [F03] ALLOCATABLE scalars
  2009-08-07  9:14 [Bug fortran/40996] New: [F03] ALLOCATABLE scalars janus at gcc dot gnu dot org
                   ` (7 preceding siblings ...)
  2009-09-30 19:56 ` burnus at gcc dot gnu dot org
@ 2009-10-02 19:33 ` burnus at gcc dot gnu dot org
  2009-10-02 22:24 ` janus at gcc dot gnu dot org
  9 siblings, 0 replies; 11+ messages in thread
From: burnus at gcc dot gnu dot org @ 2009-10-02 19:33 UTC (permalink / raw)
  To: gcc-bugs



------- Comment #9 from burnus at gcc dot gnu dot org  2009-10-02 19:33 -------
Can this be closed as FIXED?


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40996


^ permalink raw reply	[flat|nested] 11+ messages in thread

* [Bug fortran/40996] [F03] ALLOCATABLE scalars
  2009-08-07  9:14 [Bug fortran/40996] New: [F03] ALLOCATABLE scalars janus at gcc dot gnu dot org
                   ` (8 preceding siblings ...)
  2009-10-02 19:33 ` burnus at gcc dot gnu dot org
@ 2009-10-02 22:24 ` janus at gcc dot gnu dot org
  9 siblings, 0 replies; 11+ messages in thread
From: janus at gcc dot gnu dot org @ 2009-10-02 22:24 UTC (permalink / raw)
  To: gcc-bugs



------- Comment #10 from janus at gcc dot gnu dot org  2009-10-02 22:24 -------
(In reply to comment #9)
> Can this be closed as FIXED?

I think so.


-- 

janus at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|ASSIGNED                    |RESOLVED
         Resolution|                            |FIXED


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=40996


^ permalink raw reply	[flat|nested] 11+ messages in thread

end of thread, other threads:[~2009-10-02 22:24 UTC | newest]

Thread overview: 11+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2009-08-07  9:14 [Bug fortran/40996] New: [F03] ALLOCATABLE scalars janus at gcc dot gnu dot org
2009-08-07 11:23 ` [Bug fortran/40996] " janus at gcc dot gnu dot org
2009-08-07 11:48 ` burnus at gcc dot gnu dot org
2009-08-07 11:54 ` janus at gcc dot gnu dot org
2009-08-07 12:11 ` janus at gcc dot gnu dot org
2009-08-31 10:23 ` janus at gcc dot gnu dot org
2009-08-31 10:36 ` janus at gcc dot gnu dot org
2009-09-22 11:40 ` janus at gcc dot gnu dot org
2009-09-30 19:56 ` burnus at gcc dot gnu dot org
2009-10-02 19:33 ` burnus at gcc dot gnu dot org
2009-10-02 22:24 ` janus at gcc dot gnu dot org

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).