/************************************************************/
/*                            intag                         */
/************************************************************/

/* :SUMMARY: only leaf tags of a model tree in .ace data are dumped
:PRIORITY: 2
:STATUS: ok
:FEATURE: 
acedb can read .ace data that has inner tags. This is still well-
defined, since the tag names are known. Haveing this in the .ace parsing
can only be helpful.
However, dumping inner tags limits the possibilites for reading this
data into a model having inner tags changed. Thus this unnecessary limits
the flexibility and should be avoided.
:HISTORY: 
:MODEL: 
:DATA: 
M : m1
T "1995" T 10
T "1995" T 20
T 1997 inner T 30

:RESULT: 
parse: should parse with no errors and leave 1 active obj
lfind.write: only dump actual data - inner tags are implied
	     expected result:
M : "m1"
T        1995 T 10
T        1995 T 20
T        1997 T 30
lfind.show: should only dump leaf tags - 
	    expected result :
M m1
  T   1995    inner   T   10
                          20
      1997    inner   T   30

all works in: 4_7h, 4_8-990607

:SCRIPT: */
intag: dbinit wspec.mini  // inner tag
  tace
    parse: do parse $data/mini.cons1.ace  // create M object
    lfind: do find M
      write
      show
      list
  exit


// -------------------------- 2. constructed types