Преглед на файлове

Reals: comments adjusted

Arthur Yefimov преди 2 години
родител
ревизия
277f23ea7a
променени са 1 файла, в които са добавени 4 реда и са изтрити 3 реда
  1. 4 3
      src/Reals.Mod

+ 4 - 3
src/Reals.Mod

@@ -10,10 +10,11 @@ TYPE
   REAL = SYSTEM.REAL32;
   CHAR = SYSTEM.CHAR16;
 
-  LONGREAL* = SYSTEM.REAL64;
+  LONGREAL* = SYSTEM.REAL64; (** 64-bit long real number
+%RU                              64-битное длинное вещественное число *)
 
-VAR Done-: BOOLEAN; (* Indicates the success of the last conversion operation
-%RU                    Указывает на успешность последней операции перевода *)
+VAR Done-: BOOLEAN; (** Indicates the success of the last procedure call
+%RU                     Означает успешность последнего вызова процедуры *)
 
 PROCEDURE Ten(e: INTEGER): LONGREAL;
 VAR r, power: LONGREAL;