BUG: Erroneous "Class Definition is Cyclical" Error

MORE INFORMATION

Steps to Reproduce Behavior

   CLEAR ALL
   DELETE FILE cyctest.vcx
   DELETE FILE cyctest.vct
   KEYBOARD "{y}" CLEAR
   CREATE CLASS pf AS PAGEFRAME OF cyctest NOWAIT
   RELEASE WINDOW "Class Designer"

   LOCAL aobj[1], xx
   CREATE CLASS c1 AS CONTAINER OF cyctest NOWAIT
   =ASELOBJ(aObj,1)
   xx=aObj[1]
   SET CLASSLIB TO cyctest

   xx.ADDOBJECT('pf1','pf')
   xx.pf1.Page1.ADDOBJECT('pf2','pf')

   KEYBOARD "{y}" CLEAR
   RELEASE WINDOW "Class Designer"

   CREATE CLASS c2 OF cyctest AS CONTAINER NOWAIT
   =ASELOBJ(aObj,1)
   xx=aObj[1]
   xx.ADDOBJECT('c11','c1')

   SET CLASSLIB TO