Logtalk 2.18.0 release files.
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1090 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
@@ -1,6 +1,6 @@
|
||||
=================================================================
|
||||
Logtalk - Object oriented extension to Prolog
|
||||
Release 2.17.2
|
||||
Release 2.18.0
|
||||
|
||||
Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
|
||||
=================================================================
|
||||
|
@@ -1,6 +1,6 @@
|
||||
=================================================================
|
||||
Logtalk - Object oriented extension to Prolog
|
||||
Release 2.17.2
|
||||
Release 2.18.0
|
||||
|
||||
Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
|
||||
=================================================================
|
||||
|
@@ -3,9 +3,9 @@
|
||||
|
||||
|
||||
:- info([
|
||||
version is 1.0,
|
||||
version is 1.1,
|
||||
author is 'Paulo Moura',
|
||||
date is 1998/3/23,
|
||||
date is 2004/6/30,
|
||||
comment is 'Call executing time profiler.']).
|
||||
|
||||
|
||||
@@ -44,7 +44,11 @@
|
||||
time::cpu_time(Start),
|
||||
loop::forto(1, Times, Call),
|
||||
time::cpu_time(End),
|
||||
Time is (End - Start) / Times.
|
||||
time::cpu_time(Start2),
|
||||
loop::forto(1, 0, true),
|
||||
time::cpu_time(End2),
|
||||
Overhead is End2 - Start2,
|
||||
Time is (End - Start - Overhead) / Times.
|
||||
|
||||
|
||||
:- end_object.
|
||||
|
Reference in New Issue
Block a user