[Search for users] [Overall Top Noters] [List of all Conferences] [Download this site]

Conference turris::decladebug

Title:Digital Ladebug debugger
Moderator:TLE::LUCIA
Created:Fri Feb 28 1992
Last Modified:Fri Jun 06 1997
Last Successful Update:Fri Jun 06 1997
Number of topics:969
Total number of notes:3959

489.0. "Printing of F90 Derived Types" by TLE::KIMBALL (Keith Kimball 381-0573) Fri Mar 15 1996 08:12

T.RTitleUserPersonal
Name
DateLines
489.1Looks fine to meUHUH::LUCIAhttp://asaab.zko.dec.com/people/tjl/biography.htmlTue Mar 19 1996 09:4387
489.2QUARK::LIONELFree advice is worth every centTue Mar 19 1996 16:413
489.3UHUH::LUCIAhttp://asaab.zko.dec.com/people/tjl/biography.htmlWed Mar 20 1996 09:475
489.4QUARK::LIONELFree advice is worth every centThu Mar 21 1996 13:2759
489.5UHUH::LUCIAhttp://asaab.zko.dec.com/people/tjl/biography.htmlThu Mar 21 1996 16:4111
489.6QUARK::LIONELFree advice is worth every centThu Mar 21 1996 16:464
489.7Location of Example TLE::KIMBALLKeith Kimball 381-0573Fri Mar 22 1996 07:2537
489.8StatusTLE::LUCIAhttp://asaab.zko.dec.com/~lucia/biography.htmlMon May 12 1997 11:4546
    Two issues here, both on the to-do list:
    
    1. Print something a little more friendly for abstract types, like
    
    #old behavior
    (ladebug) print bins
    Error: The type BIN (:) is an abstract type.
    Cannot print the value of an abstract type.
    
    #new behavior
    (ladebug) print bins
    (unallocated)
    
    
    2. Elements of arrays of types, i.e.
    
    (ladebug) print bins(1)%element  # should not give a syntax error
    
    This should print:
    
    (1) type BIN 
      ELEMENT = 1.2345
    end type
    
    
    
    
    (ladebug) list 1,100
          1       program example
          2 
          3       type bin
          4       real :: element
          5       end type bin
          6 
          7       type(bin), allocatable       :: bins(:)
          8 
          9       allocate (bins(2))
         10    
         11       bins(1)%element  = 1.2345
         12       bins(2)%element  =-5.4321
         13 
    >    14       print *, bins
         15 
         16       end
    (ladebug)