Re: [Chicken-users] udp.scm on cygwin

[Daishi Kato]

Here is another fix for udp.scm.

I first added (uses scheduler), turned out it does not work.
I don't know why. Is there any reason for it?

The patch also includes a typo fix.

8<------8<------8<------8<------8<------8<------8<------
--- udp.scm.orig        2005-08-10 15:41:22.000000000 +0900
+++ udp.scm     2005-08-10 16:47:43.000000000 +0900
@@ -53,7 +53,7 @@
 
 (declare
 ; (unit udp)
- (uses extras)
+ (uses extras srfi-18)
  (usual-integrations)
  (fixnum-arithmetic)
  (no-bound-checks)
@@ -256,7 +256,7 @@
   return(s);
 EOF
 ))
-;;; ##net#inetaddr-port : sockaddr-in-pointer -> int
+;;; ##net#inaddr-port : sockaddr-in-pointer -> int
 ;;; return the port number of a sockaddr_in structure.
 (define ##net#inaddr-port
   (foreign-lambda* int ((pointer saddr))
8<------8<------8<------8<------8<------8<------8<------

I am not still able to run it on cygwin.

Here is a screenshot.

 ______ __     __        __
|      |  |--.|__|.----.|  |--.-----.-----.
|   ---|     ||  ||  __||    <|  -__|     |
|______|__|__||__||____||__|__|_____|__|__|
Version 2, Build 0 - windows-cygwin-x86 - [ dload ]
(c)2000-2005 Felix L. Winkelmann
#;1> (use udp)
; loading /usr/local/lib/chicken/udp.dll ...
#;2> (define s (udp-open-socket))
#;3> (udp-bind! s #f 0)
#;4> (udp-sendto s "127.0.0.1" 123 "\n")
1
#;5> (udp-recvfrom s 32)
Error: Bad address: "recvfrom"
#;5>

Could anybody reproduce this?

Thanks,
Daishi