<?xml version="1.0" encoding="UTF-8"?><rss version="2.0"
	xmlns:content="http://purl.org/rss/1.0/modules/content/"
	xmlns:dc="http://purl.org/dc/elements/1.1/"
	xmlns:atom="http://www.w3.org/2005/Atom"
	xmlns:sy="http://purl.org/rss/1.0/modules/syndication/"
	
	>
<channel>
	<title>Комментарии на: Сравнение скорости выполнения кода</title>
	<atom:link href="https://autolisp.ru/2009/09/20/execution-speed-check/feed/" rel="self" type="application/rss+xml" />
	<link>https://autolisp.ru/2009/09/20/execution-speed-check/</link>
	<description>LISP для AutoCAD</description>
	<lastBuildDate>Tue, 24 Feb 2026 16:11:05 +0000</lastBuildDate>
		<sy:updatePeriod>hourly</sy:updatePeriod>
		<sy:updateFrequency>1</sy:updateFrequency>
	<generator>http://wordpress.org/?v=4.0</generator>
	<item>
		<title>От: Кулик Алексей aka kpblc</title>
		<link>https://autolisp.ru/2009/09/20/execution-speed-check/comment-page-1/#comment-491</link>
		<dc:creator><![CDATA[Кулик Алексей aka kpblc]]></dc:creator>
		<pubDate>Sat, 26 Sep 2009 15:28:43 +0000</pubDate>
		<guid isPermaLink="false">http://autolisp.ru/?p=90#comment-491</guid>
		<description><![CDATA[Евгений, если честно, то я попросту забыл источник. Прошу прощения.]]></description>
		<content:encoded><![CDATA[<p>Евгений, если честно, то я попросту забыл источник. Прошу прощения.</p>
]]></content:encoded>
	</item>
	<item>
		<title>От: ElpanovEvgeniy</title>
		<link>https://autolisp.ru/2009/09/20/execution-speed-check/comment-page-1/#comment-490</link>
		<dc:creator><![CDATA[ElpanovEvgeniy]]></dc:creator>
		<pubDate>Sat, 26 Sep 2009 13:48:16 +0000</pubDate>
		<guid isPermaLink="false">http://autolisp.ru/?p=90#comment-490</guid>
		<description><![CDATA[Стоит указать источник вышеописанной функции benchmark.lsp.
Просмотреть код, смогут только зарегистрированные на форуме...

http://www.theswamp.org/index.php?topic=3952.0;all]]></description>
		<content:encoded><![CDATA[<p>Стоит указать источник вышеописанной функции benchmark.lsp.<br />
Просмотреть код, смогут только зарегистрированные на форуме...</p>
<p><a href="http://www.theswamp.org/index.php?topic=3952.0;all" rel="nofollow">http://www.theswamp.org/index.php?topic=3952.0;all</a></p>
]]></content:encoded>
	</item>
	<item>
		<title>От: ElpanovEvgeniy</title>
		<link>https://autolisp.ru/2009/09/20/execution-speed-check/comment-page-1/#comment-482</link>
		<dc:creator><![CDATA[ElpanovEvgeniy]]></dc:creator>
		<pubDate>Fri, 25 Sep 2009 12:58:27 +0000</pubDate>
		<guid isPermaLink="false">http://autolisp.ru/?p=90#comment-482</guid>
		<description><![CDATA[Хотелось бы добавить, что не всегда необходимо такое тщательное тестирование сравнения скорости. Обычно, разница составляет довольно много и необходимо просто проверить время выполнения. Самой удобной функцией, для получения текущего времени, я считаю
 (_vl-times) 
Другими словами, замер времени выполнения программы будет выглядеть:
[cc lang=&quot;cadlisp&quot;](setq time (car (_vl-times)))
;;... здесь ваша тестовая функция ...
(princ (strcat &quot;\n &quot; (rtos (/ (- (car (_vl-times)) time) 1000.) 2 3) &quot; sec.&quot;))[/cc]]]></description>
		<content:encoded><![CDATA[<p>Хотелось бы добавить, что не всегда необходимо такое тщательное тестирование сравнения скорости. Обычно, разница составляет довольно много и необходимо просто проверить время выполнения. Самой удобной функцией, для получения текущего времени, я считаю<br />
 (_vl-times)<br />
Другими словами, замер времени выполнения программы будет выглядеть:</p>
<div class="codecolorer-container cadlisp default" style="overflow:auto;white-space:nowrap;border:1px solid #9F9F9F;width:435px;"><table cellspacing="0" cellpadding="0"><tbody><tr><td style="padding:5px;font:normal 12px/1.4em Monaco, Lucida Console, monospace;white-space:nowrap;text-align:center;color:#888888;background-color:#EEEEEE;border-right: 1px solid #9F9F9F;"><div>1<br />2<br />3<br /></div></td><td><div class="cadlisp codecolorer" style="padding:5px;font:normal 12px/1.4em Monaco, Lucida Console, monospace;white-space:nowrap;"><span style="color: #66cc66;">&#40;</span><span style="color: #b1b100;">setq</span> time <span style="color: #66cc66;">&#40;</span><span style="color: #b1b100;">car</span> <span style="color: #66cc66;">&#40;</span>_vl<span style="color: #66cc66;">-</span>times<span style="color: #66cc66;">&#41;</span><span style="color: #66cc66;">&#41;</span><span style="color: #66cc66;">&#41;</span><br />
<span style="color: #808080; font-style: italic;">;;... здесь ваша тестовая функция ...</span><br />
<span style="color: #66cc66;">&#40;</span><span style="color: #b1b100;">princ</span> <span style="color: #66cc66;">&#40;</span><span style="color: #b1b100;">strcat</span> <span style="color: #ff0000;">&quot;<span style="color: #000099; font-weight: bold;">\n</span> &quot;</span> <span style="color: #66cc66;">&#40;</span><span style="color: #b1b100;">rtos</span> <span style="color: #66cc66;">&#40;</span><span style="color: #66cc66;">/</span> <span style="color: #66cc66;">&#40;</span><span style="color: #66cc66;">-</span> <span style="color: #66cc66;">&#40;</span><span style="color: #b1b100;">car</span> <span style="color: #66cc66;">&#40;</span>_vl<span style="color: #66cc66;">-</span>times<span style="color: #66cc66;">&#41;</span><span style="color: #66cc66;">&#41;</span> time<span style="color: #66cc66;">&#41;</span> <span style="color: #cc66cc;">1000</span>.<span style="color: #66cc66;">&#41;</span> <span style="color: #cc66cc;">2</span> <span style="color: #cc66cc;">3</span><span style="color: #66cc66;">&#41;</span> <span style="color: #ff0000;">&quot; sec.&quot;</span><span style="color: #66cc66;">&#41;</span><span style="color: #66cc66;">&#41;</span></div></td></tr></tbody></table></div>
]]></content:encoded>
	</item>
	<item>
		<title>От: Стили программирования : AutoLISP / VisualLISP</title>
		<link>https://autolisp.ru/2009/09/20/execution-speed-check/comment-page-1/#comment-411</link>
		<dc:creator><![CDATA[Стили программирования : AutoLISP / VisualLISP]]></dc:creator>
		<pubDate>Mon, 21 Sep 2009 22:18:38 +0000</pubDate>
		<guid isPermaLink="false">http://autolisp.ru/?p=90#comment-411</guid>
		<description><![CDATA[[...] слоя). Сравним скорость работы по методике, описанной здесь (предупреждаю сразу &#8211; время проверки весьма [...]]]></description>
		<content:encoded><![CDATA[<p>[...] слоя). Сравним скорость работы по методике, описанной здесь (предупреждаю сразу &#8211; время проверки весьма [...]</p>
]]></content:encoded>
	</item>
</channel>
</rss>
