Nothing strange happened. I test this demo## Код:
```
MODULE TestRecordFrom;
   
   IMPORT Log:=StdLog;

   TYPE
   Rec = RECORD END;
   
   PROCEDURE (VAR r: Rec)From(VAR par: ANYREC), NEW;
   BEGIN
      Log.String("hello");Log.Ln;
   END From;

   PROCEDURE Do* ;
      VAR 
      r: Rec; 
      r2: RECORD END;
   BEGIN
      r.From(r2);
   END Do;
   
 
END  TestRecordFrom.Do
```
Maybe your changes to the compiler made this happen