bugfix: '$' for TPort

This commit is contained in:
Araq 2013-11-19 14:06:39 +01:00
commit 619356dd08

View file

@ -154,9 +154,8 @@ proc newTSocket(fd: TSocketHandle, isBuff: bool): TSocket =
proc `==`*(a, b: TPort): bool {.borrow.} proc `==`*(a, b: TPort): bool {.borrow.}
## ``==`` for ports. ## ``==`` for ports.
proc `$`*(p: TPort): string = proc `$`*(p: TPort): string {.borrow.}
## returns the port number as a string ## returns the port number as a string
result = $ze(int16(p))
proc ntohl*(x: int32): int32 = proc ntohl*(x: int32): int32 =
## Converts 32-bit integers from network to host byte order. ## Converts 32-bit integers from network to host byte order.