Как реализовать схему UDP в Rebol3

Question

Насколько я понимаю исходный код, сетевое устройство уже готово к UDP, но как сделать схему UDP?

Answer 1

В этой линии источника https://github.com/rebol/r3/blob/master/src/core/c-port.c#L612, комментарии говорят

In order to add a port scheme: 
In mezz-ports.r add a make-scheme. 
Add an Init_*_Scheme() here. 
Be sure host-devices.c has the device enabled. 

Я думаю, что первая инструкция относится к Mezz/SYS-ports.r. Итак, у нас есть этот пример https://github.com/rebol/r3/blob/master/src/mezz/sys-ports.r#L254, мы могли бы добавить что-то вроде

make-scheme [ 
    title: "UDP Networking" 
    name: 'udp 
    spec: system/standard/port-spec-net 
    info: system/standard/net-info ; for C enums 
    awake: func [event] [print ['UDP-event event/type] true] 
] 

Вы бы тогда написать INIT_UDP_SCHEME как этот для TCP https://github.com/rebol/r3/blob/master/src/core/p-net.c#L299 где TCP_Actor начинается здесь https://github.com/rebol/r3/blob/master/src/core/p-net.c#L92, а затем инициализировать его здесь https://github.com/rebol/r3/blob/master/src/core/c-port.c#L626

И, как вы говорите, UDP, похоже, в противном случае готов.