-function
-err mknod_char (pathname path, fileperm perm, int<??> major, int<??> minor)
+entry_point
+void mknod_char (pathname path, fileperm perm, uint64 major, uint64 minor)
<<
- return mknod (path, S_IFCHR | perm, makedev (major, minor));
->>
-<:doc<
-
-
-
+ if (mknod (path, S_IFCHR | perm, makedev (major, minor)) == -1) {
+ error_errno ("mknod: %s", path);
+ return -1;
+ }
+ return 0;
>>
;;