Согласно раздел 1.2.6 SICP, упражнение 1.22:
Большинство реализаций Лиспа включают примитив, называемый средой выполнения, который возвращает целое число, указывающее количество времени, в течение которого система работает (измеряется, например, в микросекундах).
Я использую DrScheme, где среда выполнения недоступна, поэтому я ищу хорошую замену. Я обнаружил в справочнике по PLT-схеме, что существует current-milliseconds примитив. Кто-нибудь знает, есть ли в схеме таймер с лучшим разрешением?
_ 1_ - это функция, которая возвращает текущий счетчик миллисекунд из системы, но он может уменьшиться. _ 2_ аналогично, но возвращает гарантированно увеличивающееся число с плавающей запятой.
На этой странице также есть множество похожих функций, но если все, что вам нужно, - это синхронизировать определенную функцию, просто используйте (_ 3_ < em> expr), и он распечатает время, затраченное на оценку выражения.
Еще одна важная вещь - это профилировщик, на случай, если вам понадобится еще подробный анализ вашего кода.
current-milliseconds, а не current-millisecond. Я попытался отредактировать ответ, но SO требует как минимум 6 символов в редактировании.
- person bruno nery; 10.11.2011
Я сегодня тоже столкнулся с этой проблемой. Я использую DrRacket, поскольку он заменил DrScheme. Хотя это старая ветка, я добавляю свои выводы для всех, кто впервые наткнется на эту ветку.
Выбрав R5RS (#lang r5rs) в качестве выбранного языка, добавьте следующие две строки перед программой, чтобы она работала.
(#%require (only racket/base current-milliseconds))
(define (runtime) (current-milliseconds))
#lang ... строку? #lang R5RS не работает.
- person Zelphir Kaltstahl; 19.08.2016
if кода книги, чтобы она работала в #lang racket.
- person Zelphir Kaltstahl; 19.08.2016
Вы можете использовать пакет sicp, который содержит определение runtime.
Вот описание пакета.
И вот инструкции по установке:
Откройте диспетчер пакетов: в DrRacket выберите меню Файл, затем выберите Диспетчер пакетов….
На вкладке Что я имею в виду найдите текстовое поле и введите: sicp
Наконец, нажмите кнопку Установить.
Теперь вы можете вызывать runtime и другие процедуры из SICP:
#lang sicp
(runtime)
Ожидаемый результат будет таким:
1606611898030115
>
Я использую mit-схему для выполнения SICP и обнаружил, что миллисекунды задаются (real-time-clock) согласно руководство пользователя.
timed-prime-test, которая работает вracket: gist.github.com/Isaac-Kleinman/ 1b623bc2463b241b4383 - person Isaac Kleinman schedule 18.09.2015