51 |
(return-type kern-return-t) |
(return-type kern-return-t) |
52 |
(arguments ((thread-port "thread" thread-t))) |
(arguments ((thread-port "thread" thread-t))) |
53 |
) |
) |
54 |
|
|
55 |
|
|
56 |
|
; Allocate new port with recieve rights in TASK-PORT. The name of |
57 |
|
; the port will be received in NAMEP. |
58 |
|
(define-routine port-allocate |
59 |
|
(c-name "port_allocate") |
60 |
|
(comment "allocate new port with recieve rights in TASK-PORT") |
61 |
|
() |
62 |
|
(return-type kern-return-t) |
63 |
|
(arguments ((task-port "task" task-t) |
64 |
|
(namep "namep" rtmk-port-receive-t AD_IN))) |
65 |
|
) |
66 |
|
|
67 |
|
; Allocate w new port with receive rights in TASK-PORT. The name of |
68 |
|
; the new port is supplied in PORT_NAME. If a previous port exists |
69 |
|
; with that name, KERN_NAME_EXISTS is returned. |
70 |
|
(define-routine port-allocate-name |
71 |
|
(c-name "port_allocate_name") |
72 |
|
(comment "FIXME") |
73 |
|
() |
74 |
|
(return-type kern-return-t) |
75 |
|
(arguments ((task-port "task" task-t) |
76 |
|
(port-name "name" rtmk-port-name-t))) |
77 |
|
) |