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;
   REAL = SYSTEM.REAL32;
   CHAR = SYSTEM.CHAR16;
   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;
 PROCEDURE Ten(e: INTEGER): LONGREAL;
 VAR r, power: LONGREAL;
 VAR r, power: LONGREAL;