Arc Forumnew | comments | leaders | submitlogin
3 points by pg 6166 days ago | link | parent

You might try (asv 80).


3 points by fredfred 6166 days ago | link

c:\MzScheme\arc0>mzscheme -m -f as.scm

Use (quit) to quit, (tl) to return here after an interrupt.

arc> (defop said req

  (aform [w/link (pr "you said: " (arg _ "foo"))

           (pr "click here")]

    (input "foo")

    (submit)))
#<procedure:gs1430>

arc> (asv 80)

The syntax of the command is incorrect.

Error: "tcp-listen: listen on 80 failed (An address incompatible with the requested protocol was used.; errno=10047)"

That "The syntax of the command is incorrect." is probably a clue, but where to look and for what?

-----

2 points by fredfred 6166 days ago | link

That "The syntax of the command is incorrect." appears to be from arc.arc:1204

(def date ((o time (seconds)))

  (let val (tostring (system (string "date -u -r " time " \"+%Y-%m-%d\"")))

    (subseq val 0 (- (len val) 1))))
which could presumably be replaced with something from date.ss?

But it probably doesn't explain the error: "Error: "tcp-listen: listen on 80 failed" which only seems to appear in \lib\libmzsch352_000.dll

So, toast then?

-----