ソースを参照

fixed some function types, LONGINT -> ADDRESS

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@6605 8c9fc860-2736-0410-a75d-ab315db34111
eth.guenter 9 年 前
コミット
1976ff0c66

+ 2 - 2
source/Darwin.AMD64.Unix.Mod

@@ -371,8 +371,8 @@ VAR
 	system-		: PROCEDURE {C} ( cmd: ADDRESS );
 	uname-		: PROCEDURE {C} ( utsname: ADDRESS ): LONGINT;
 
-	getcwd-		: PROCEDURE {C} ( buf: ADDRESS;  len: SIZE ): LONGINT;
-	getenv-		: PROCEDURE {C} ( name: ADDRESS ): LONGINT;
+	getcwd-		: PROCEDURE {C} ( buf: ADDRESS;  len: SIZE ): ADDRESS;
+	getenv-		: PROCEDURE {C} ( name: ADDRESS ): ADDRESS;
 
 	opendir-		: PROCEDURE {C} ( name: ADDRESS ): ADDRESS;
 	readdir-		: PROCEDURE {C} ( dir: ADDRESS ): Dirent;

+ 2 - 2
source/Darwin.I386.Unix.Mod

@@ -348,8 +348,8 @@ VAR
 	system-		: PROCEDURE {C} ( cmd: ADDRESS );
 	uname-		: PROCEDURE {C} ( utsname: ADDRESS ): LONGINT;
 
-	getcwd-		: PROCEDURE {C} ( buf: ADDRESS;  len: SIZE ): LONGINT;
-	getenv-		: PROCEDURE {C} ( name: ADDRESS ): LONGINT;
+	getcwd-		: PROCEDURE {C} ( buf: ADDRESS;  len: SIZE ): ADDRESS;
+	getenv-		: PROCEDURE {C} ( name: ADDRESS ): ADDRESS;
 
 	opendir-		: PROCEDURE {C} ( name: ADDRESS ): ADDRESS;
 	readdir-		: PROCEDURE {C} ( dir: ADDRESS ): Dirent;

+ 2 - 2
source/Linux.AMD64.Unix.Mod

@@ -365,8 +365,8 @@ VAR
 	system-		: PROCEDURE {C} ( cmd: ADDRESS );
 	uname-		: PROCEDURE {C} ( utsname: ADDRESS ): LONGINT;
 
-	getcwd-		: PROCEDURE {C} ( buf: ADDRESS;  len: SIZE ): LONGINT;
-	getenv-		: PROCEDURE {C} ( name: ADDRESS ): LONGINT;
+	getcwd-		: PROCEDURE {C} ( buf: ADDRESS;  len: SIZE ): ADDRESS;
+	getenv-		: PROCEDURE {C} ( name: ADDRESS ): ADDRESS;
 
 	opendir-		: PROCEDURE {C} ( name: ADDRESS ): ADDRESS;
 	readdir-		: PROCEDURE {C} ( dir: ADDRESS ): Dirent;

+ 2 - 2
source/Linux.I386.Unix.Mod

@@ -344,8 +344,8 @@ VAR
 	system-		: PROCEDURE {C} ( cmd: ADDRESS );
 	uname-		: PROCEDURE {C} ( utsname: ADDRESS ): LONGINT;
 
-	getcwd-		: PROCEDURE {C} ( buf: ADDRESS;  len: SIZE ): LONGINT;
-	getenv-		: PROCEDURE {C} ( name: ADDRESS ): LONGINT;
+	getcwd-		: PROCEDURE {C} ( buf: ADDRESS;  len: SIZE ): ADDRESS;
+	getenv-		: PROCEDURE {C} ( name: ADDRESS ): ADDRESS;
 
 	opendir-		: PROCEDURE {C} ( name: ADDRESS ): ADDRESS;
 	readdir-		: PROCEDURE {C} ( dir: ADDRESS ): Dirent;

+ 2 - 2
source/Solaris.AMD64.Unix.Mod

@@ -371,8 +371,8 @@ VAR
 	system-		: PROCEDURE {C} ( cmd: ADDRESS );
 	uname-		: PROCEDURE {C} ( utsname: ADDRESS ): LONGINT;
 
-	getcwd-		: PROCEDURE {C} ( buf: ADDRESS;  len: SIZE ): LONGINT;
-	getenv-		: PROCEDURE {C} ( name: ADDRESS ): LONGINT;
+	getcwd-		: PROCEDURE {C} ( buf: ADDRESS;  len: SIZE ): ADDRESS;
+	getenv-		: PROCEDURE {C} ( name: ADDRESS ): ADDRESS;
 
 	opendir-		: PROCEDURE {C} ( name: ADDRESS ): ADDRESS;
 	readdir-		: PROCEDURE {C} ( dir: ADDRESS ): Dirent;

+ 2 - 2
source/Solaris.I386.Unix.Mod

@@ -347,8 +347,8 @@ VAR
 	system-		: PROCEDURE {C} ( cmd: ADDRESS );
 	uname-		: PROCEDURE {C} ( utsname: ADDRESS ): LONGINT;
 
-	getcwd-		: PROCEDURE {C} ( buf: ADDRESS;  len: SIZE ): LONGINT;
-	getenv-		: PROCEDURE {C} ( name: ADDRESS ): LONGINT;
+	getcwd-		: PROCEDURE {C} ( buf: ADDRESS;  len: SIZE ): ADDRESS;
+	getenv-		: PROCEDURE {C} ( name: ADDRESS ): ADDRESS;
 
 	opendir-		: PROCEDURE {C} ( name: ADDRESS ): ADDRESS;
 	readdir-		: PROCEDURE {C} ( dir: ADDRESS ): Dirent;