Ещё, когда хотите, чтобы народ ваш тест запустил, лучше приводите весь код вот так примерно.  А то приходится дописывать.

## Код:
```
MODULE TestTest;

   IMPORT TextModels, TextViews, Views;
   
   PROCEDURE Do1* ();
  VAR
    m:TextModels.Model;
    v1,v2:TextViews.View;
  BEGIN
    m:=TextModels.dir.New();
    m.NewWriter(NIL).WriteChar('0');
    v1:=TextViews.dir.New(m);
    v2:=TextViews.dir.New(m);
    Views.OpenView( v1 );
    Views.OpenView( v2 );
  END Do1;

END TestTest.Do1
```
