[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
RE: [Axiom-developer] RE: [Gcl-devel] Re: axiom porting
From: |
Mike Thomas |
Subject: |
RE: [Axiom-developer] RE: [Gcl-devel] Re: axiom porting |
Date: |
Thu, 5 May 2005 10:36:34 +1000 |
Hi Camm/Bill.
A bunch of Windows probe-file, directory and server output below. Basically
the server program is failing because accept won't deal with the "socket"
it's being passed and on first glance I suspect that this is because it is
not the right Winsock type. I'll look further later but I'm suspicious that
there may be a lot of work ahead here for me.
Cheers
Mike Thomas
| As for bombing when the file is not there, this would appear to be an
| error in probe-file on Windows. The 'server' example is supposed to
| return a blank page and continue in this case. Please let me know if
| there is a bug here. (si::use-fast-links nil) and :bt if thrown into
| the debugger. (I do get an error on Linux when the file exists but
| cannot be opened due to permissions, for example.)
>(probe-file "/msys/1.0")
#p"c:/msys/1.0"
>(probe-file "/msys/1.0/")
#p"c:/msys/1.0/"
>(probe-file "c:/msys/1.0/")
#p"c:/msys/1.0/"
>(probe-file "c:/msys/1.0")
#p"c:/msys/1.0"
>(directory "c:/msys/1.0")
(#p"c:/msys/1.0")
>(directory "c:/msys/1.0/")
(#p"c:/msys/1.0/bin" #p"c:/msys/1.0/doc" #p"c:/msys/1.0/etc"
#p"c:/msys/1.0/home" #p"c:/msys/1.0/include" #p"c:/msys/1.0/lib"
#p"c:/msys/1.0/local" #p"c:/msys/1.0/m.ico" #p"c:/msys/1.0/mingw"
#p"c:/msys/1.0/msys.bat" #p"c:/msys/1.0/msys.bat~"
#p"c:/msys/1.0/msys.ico" #p"c:/msys/1.0/share" #p"c:/msys/1.0/ssl"
#p"c:/msys/1.0/uninstall")
>(open "/etc" :if-does-not-exist nil)
NIL
>(open "c:/msys/1.0" :if-does-not-exist nil)
NIL
>(open "c:/msys/1.0/" :if-does-not-exist nil)
NIL
>(open "c:/msys/1.0/msys.bat" :if-does-not-exist nil)
#<input stream "c:/msys/1.0/msys.bat">
>(bar 8085 #'foo)
Error in LET [or a callee]: Error "No such file or directory" on accepting
conne
ction to #<two-way stream 104c969c>
Broken at INVOKE-DEBUGGER. Type :H for Help.
1 (Abort) Return to top level.
dbl:>>:bt
#0 INVOKE-DEBUGGER
{datum=#<conditions::internal-simple-stream-error.0>,argume
nts=nil,loc2=#<condit...} [ihs=15]
#1 ERROR
{datum=conditions::internal-simple-stream-error,arguments=(:function-
name let :f...} [ihs=14]
#2 CLCS-UNIVERSAL-ERROR-HANDLER
{error-name=:error,correctable=nil,function-na
me=let,continue-format-string=("")...} [ihs=13]
#3 ACCEPT {loc0=#<two-way stream 104c969c>} [ihs=12]
#4 BAR {lambda-block=foo,} [ihs=7]
#5 EVAL {loc0=nil,loc1=nil,loc2=nil,loc3=(lambda-block bar (p fn)
...),loc4=80
87,loc5=(l...} [ihs=6]
#6 TOP-LEVEL
{loc0=nil,loc1=0,loc2=0,loc3=nil,loc4=nil,loc5=nil,loc6=nil,loc7=
"c:/cvs/stable/...} [ihs=5]
#7 FUNCALL {loc0=#<compiled-function system:top-level>} [ihs=4]
NIL
dbl:>>:h
- Re: [Axiom-developer] RE: [Gcl-devel] Re: axiom porting, (continued)
RE: [Axiom-developer] RE: [Gcl-devel] Re: axiom porting, Page, Bill, 2005/05/03
RE: [Axiom-developer] RE: [Gcl-devel] Re: axiom porting, Page, Bill, 2005/05/03
Re: [Axiom-developer] RE: [Gcl-devel] Re: axiom porting, Camm Maguire, 2005/05/05
Re: [Axiom-developer] RE: [Gcl-devel] Re: axiom porting, Bill Page, 2005/05/05
RE: [Axiom-developer] RE: [Gcl-devel] Re: axiom porting, Mike Thomas, 2005/05/05
Re: [Axiom-developer] RE: [Gcl-devel] Re: axiom porting, Bill Page, 2005/05/04
RE: [Axiom-developer] RE: [Gcl-devel] Re: axiom porting, Mike Thomas, 2005/05/05
Re: [Axiom-developer] RE: [Gcl-devel] Re: axiom porting, Bill Page, 2005/05/05
Re: [Axiom-developer] RE: [Gcl-devel] Re: axiom porting, Camm Maguire, 2005/05/05