FreeBSD Libc: errno -> __error()

BlackBox/_FreeBSD_/Lin/Mod/Libc.txt

@@ -592,9 +592,11 @@ MODULE LinLibc ["libc.so.7"];
 		PROCEDURE [ccall] stat* (path: PtrSTR; VAR sp: stat_t): int;
 *)
 	VAR
-		errno*: INTEGER;
+		(* errno*: INTEGER; *)
 		stdin* ["__stdinp"]: PtrFILE;
 
+	PROCEDURE __error* (): INTEGER;
+
 	(* POSIX.1 *)
 		PROCEDURE [ccall] stat* (path: PtrSTR; VAR sp: stat_t): int;
 

BlackBox/_FreeBSD_/Lin/Mod/gen-Libc/custom

@@ -1,6 +1,8 @@
 	VAR
-		errno*: INTEGER;
+		(* errno*: INTEGER; *)
 		stdin* ["__stdinp"]: PtrFILE;
 
+	PROCEDURE __error* (): INTEGER;
+
 	(* POSIX.1 *)
 		PROCEDURE [ccall] stat* (path: PtrSTR; VAR sp: stat_t): int;