1 "

     3 "

     2  COPYRIGHT (c) 1997 by eXept Software AG

     4  COPYRIGHT (c) 1997 by eXept Software AG

     3               All Rights Reserved

     5               All Rights Reserved

     4 

     6 

     5  This software is furnished under a license and may be used

     7  This software is furnished under a license and may be used

  3908         ^ nil

  3910         ^ nil

  3909     ].

  3911     ].

  3910 

  3912 

  3911     cls := self resolveName:specClass.

  3913     cls := self resolveName:specClass.

  3912     dst := columns collect:[:aCol| aCol literalArrayEncoding ].

  3914     dst := columns collect:[:aCol| aCol literalArrayEncoding ].

  3914     spc nextPutAll:'    ^'.

  3916     spc nextPutAll:'    ^'.

  3915     UISpecification prettyPrintSpecArray:dst asArray on:spc indent:4.

  3917     UISpecification prettyPrintSpecArray:dst asArray on:spc indent:4.

  3916     spc := spc contents.

  3918     spc := spc contents.

  3917 

  3919 

  3918     "/ if that method already exists, do not overwrite the category

  3920     "/ if that method already exists, do not overwrite the category