From: Alexander Shiryaev <aixp@mail.ru>
Date: Fri, 6 Dec 2013 23:07:44 +0000 (+0400)
Subject: Linux Kernel.Time: clock -> clock_gettime
X-Git-Url: http://deadsoftware.ru/gitweb?a=commitdiff_plain;h=07ad48856e7ff64bea7a878e687f8e3bf17d8767;p=bbcp.git

Linux Kernel.Time: clock -> clock_gettime
---

diff --git a/new/_FreeBSDLinuxOpenBSD_Interp/build b/new/_FreeBSDLinuxOpenBSD_Interp/build
index 6592f02..56c17f5 100755
--- a/new/_FreeBSDLinuxOpenBSD_Interp/build
+++ b/new/_FreeBSDLinuxOpenBSD_Interp/build
@@ -4,6 +4,10 @@
 ConsCompiler.Compile('Lin/Mod', 'Dl.txt')
 ConsCompiler.Compile('Lin/Mod', 'Libc.txt')
 ConsCompiler.Compile('Lin/Mod', 'Iconv.txt')
+
+# Linux only
+ConsCompiler.Compile('Lin/Mod', 'Rt.txt')
+
 DevCompiler.CompileThis Kernel
 
 DevCompiler.CompileThis Files Console Math Strings Meta Dialog
diff --git a/new/_Linux_/Lin/Mod/Rt.txt b/new/_Linux_/Lin/Mod/Rt.txt
new file mode 100644
index 0000000..c58c4d0
--- /dev/null
+++ b/new/_Linux_/Lin/Mod/Rt.txt
@@ -0,0 +1,26 @@
+MODULE LinRt ["librt.so.1"];
+
+	(*
+		A. V. Shiryaev, 2013.12
+
+		GNU/Linux
+		32-bit
+	*)
+
+	CONST
+		CLOCK_REALTIME* = 0;
+		CLOCK_MONOTONIC* = 1;
+	
+	TYPE
+		time_t* = INTEGER;
+
+		timespec_t* = RECORD [untagged]
+			tv_sec*: time_t; (* seconds *)
+			tv_nsec*: INTEGER (* nanoseconds *)
+		END;
+
+		clockid_t* = INTEGER;
+
+	PROCEDURE [ccall] clock_gettime* (clock_id: clockid_t; VAR tp: timespec_t): INTEGER;
+
+END LinRt.
diff --git a/new/_Linux_/System/Mod/Kernel.odc b/new/_Linux_/System/Mod/Kernel.odc
index 08d2bcc..cc08a87 100644
Binary files a/new/_Linux_/System/Mod/Kernel.odc and b/new/_Linux_/System/Mod/Kernel.odc differ
diff --git a/new/_Linux_/libBB.so b/new/_Linux_/libBB.so
index 1f943b1..6e4e174 100644
Binary files a/new/_Linux_/libBB.so and b/new/_Linux_/libBB.so differ
diff --git a/new/_Linux_/libBB0.so b/new/_Linux_/libBB0.so
index 1f5910e..b7ed696 100644
Binary files a/new/_Linux_/libBB0.so and b/new/_Linux_/libBB0.so differ