scriptinv

[chiark-tcl.git] / base / tables-examples.tct

diff --git a/base/tables-examples.tct b/base/tables-examples.tct
index 82700dcd402e0c14c28f4a8d5797fe12a0b86ab5..b98ba5ff19bd1a89a950c40e5a240750f60ebd42 100644 (file)
--- a/base/tables-examples.tct
+++ b/base/tables-examples.tct
@@ -24,7 +24,7 @@ Table toplevel TopLevel_Command
                ...     obj
        tuntap-socket
                subcmd  enum(TunSocket_SubCommand,"tuntap-socket subcommand")
-               ...     obj
+               ...     obj
        ulong
                subcmd  enum(ULong_SubCommand,"ulong subcommand")
                ...     obj
@@ -184,10 +184,7 @@ Table dgram_socket DgramSocket_SubCommand
                ?script obj
 
 Table tuntap_socket TunSocket_SubCommand
-       create-ptp
-               local   sockaddr
-               peer    sockaddr
-               mtu     long
+       create
                ?ifname string
                =>      iddata(&tuntap_socks)
        close
@@ -197,6 +194,7 @@ Table tuntap_socket TunSocket_SubCommand
                =>      string
        receive
                sock    iddata(&tuntap_socks)
+               mtu     long
                data    hb
        on-transmit
                sock    iddata(&tuntap_socks)