FIXED/HALF: зацикливание оптимизатора при использовании -OA (#263)

src/compiler/OptTree-Drive.ref

@@ -37,7 +37,24 @@ $ENTRY OptTree-Drive-Prepare {
 
   (s.OptDrive s.OptIntrinsic)
   e.AST-B (DriveInfo e.DriveInfo) e.AST-E
-    = <UpdateDriveInfo s.OptDrive s.OptIntrinsic (e.DriveInfo) e.AST-B e.AST-E>;
+    = <UpdateDriveInfo s.OptDrive s.OptIntrinsic (e.DriveInfo) e.AST-B e.AST-E>
+
+    /*
+      TODO: УДАЛИТЬ ЭТОТ КОСТЫЛЬ!!!
+
+      Функция UpdateDriveInfo дублирует имена оптимизируемых функций,
+      из-за чего большой цикл «разметка-оптимизация-разметка» не завершается
+      (на каждой итерации в DriveInfo появляются новые дубликаты тех же имён).
+
+      Правильнее исправить функцию UpdateDriveInfo, однако она была обновлена
+      в ветке cstyler-intrinsic, которая ещё не объединена с master.
+      Если исправить логику в UpdateDriveInfo, то обнаружатся конфликты.
+
+      Поэтому вносим временный костыль, который будет удалён после слияния
+      cstyler-intrinsic и master.
+    */
+    : (DriveInfo (e.Names) e.Functions) e.AST
+    = (DriveInfo (<Unique e.Names>) <Unique e.Functions>) e.AST;
 
   (s.OptDrive s.OptIntrinsic) e.AST
     = (/* no names */) /* no info */ : e.EmptyInfo