LINUX.ORG.RU

История изменений

Исправление monk, (текущая версия) :

х = получить_момент_времени()
какая_то_функция()
задержка = получить_момент_времени() - х

Это так и будет. Разве что вместо _ можно - в именах использовать. Побочные эффекты не запрещены.

Второе будет так (имена не переводил):

calc-bonus(tau wordLen hints) =
    tau := tau - wordLen // 4
    bonus = - hints
    points = '((2 5) (7 3) (15 2) (30 1))
    цикл/первый 
       ;
         p points
         #:когда tau < p[0]
       bonus := bonus + p[1]
    макс 0 bonus

или так (массив points вместо списка и условие цикла в одну строку)

calc-bonus(tau wordLen hints) =
    tau := tau - wordLen // 4
    bonus = - hints
    points = #((2 5) (7 3) (15 2) (30 1))
    цикл/первый (p points; #:когда tau < p[0])
       bonus := bonus + p[1]
    макс 0 bonus

= используется при определении новой переменной, := при изменении существующей

Исходная версия monk, :

х = получить_момент_времени()
какая_то_функция()
задержка = получить_момент_времени() - х

Это так и будет. Разве что вместо _ можно - в именах использовать. Побочные эффекты не запрещены.

Второе будет так (имена не переводил):

calc-bonus(tau wordLen hints) =
    tau := tau - wordLen // 4
    bonus = - hints
    points = '((2 5) (7 3) (15 2) (30 1))
    цикл/первый 
       ;
         p points
         #:когда tau < p[0]
       bonus := bonus + p[1]
    макс 0 bonus

или так (массив points вместо списка и условие цикла в одноу строку)

calc-bonus(tau wordLen hints) =
    tau := tau - wordLen // 4
    bonus = - hints
    points = #((2 5) (7 3) (15 2) (30 1))
    цикл/первый (p points; #:когда tau < p[0])
       bonus := bonus + p[1]
    макс 0 bonus

= используется при определении новой переменной, := при изменении существующей