S_IFSOCK

2001-05-14 Thread Golubev I. N.

Not all systems have `S_IFSOCK' definition (from ).  On
those guile-1.4 will fail to compile.  This can be worked around
without changing sources by adding `-DS_IFSOCK=S_IFIFO' to CPPFLAGS
while configuring.  To avoid such tricks it may be patched like this.

After all, if it wants to be an interpreter for newer automake, it
should be as portable as old one (perl).

--- filesys.c   Mon Jun 12 16:43:35 2000
+++ filesys.c   Mon May 14 18:17:21 2001
@@ -398,8 +398,10 @@
   ve[13] = scm_sym_char_special;
 else if (S_ISFIFO (mode))
   ve[13] = scm_sym_fifo;
+#ifdef S_ISSOCK
 else if (S_ISSOCK (mode))
   ve[13] = scm_sym_sock;
+#endif /* def S_ISSOCK */
 else
   ve[13] = scm_sym_unknown;
--- posix.c Mon Jun 12 16:43:37 2000
+++ posix.c Mon May 14 18:19:16 2001
@@ -1226,8 +1226,10 @@
 ctype = S_IFCHR;
   else if (strcmp (p, "fifo") == 0)
 ctype = S_IFIFO;
+#ifdef S_IFSOCK
   else if (strcmp (p, "socket") == 0)
 ctype = S_IFSOCK;
+#endif /* def S_IFSOCK */
   else
 SCM_OUT_OF_RANGE (2,type);
 

___
Bug-guile mailing list
[EMAIL PROTECTED]
http://mail.gnu.org/mailman/listinfo/bug-guile



boot-9 `define' failure

2001-05-14 Thread Golubev I. N.

Version: 1.4
Platform: i586-pc-sco3.2v5.0.2
Configuration: gcc 2.95.3, --enable-shared --disable-static --with-modules

Any attempt to run `guile' terminates with `ERROR: Unbound variable:
noop'.  In gdb it appears that error happens in `(define return-it
noop)' in `ice-9/boot-9.scm'.  Scheme value is what is printed by
`scm_display' for value received by `scm_eval_x'.  File name is from
`scm_load_startup_files' source.

Is it ok that `scm_m_define' receives `(define return-it noop)' as `x'
arg?

gdb backtrace up to `scm_error' follows

#11 0x8008638d in scm_error () at ../../guile-1.4/libguile/error.c:90
#12 0x8008677b in scm_lookupcar (vloc=134623560, genv=10612, check=1)
at ../../guile-1.4/libguile/eval.c:348
#13 0x800873e5 in scm_m_define (x=134623560, env=10612)
at ../../guile-1.4/libguile/eval.c:435
#14 0x8008c889 in scm_apply (proc=134609368, arg1=134623496, args=10612)
at ../../guile-1.4/libguile/eval.c:3409
#15 0x8008acfb in scm_ceval (x=134623496, env=10612)
at ../../guile-1.4/libguile/eval.c:2551
#16 0x80093d44 in scm_eval_x () at ../../guile-1.4/libguile/eval.c:3832
#17 0x800a2849 in load () at ../../guile-1.4/libguile/load.c:97
#18 0x80084192 in scm_internal_dynamic_wind ()
at ../../guile-1.4/libguile/dynwind.c:166
#19 0x800a1b99 in scm_primitive_load (filename=134614312)
at ../../guile-1.4/libguile/load.c:126
#20 0x800a23a1 in scm_primitive_load_path (filename=134614304)
at ../../guile-1.4/libguile/load.c:450
#21 0x8009f124 in invoke_main_func () at ../../guile-1.4/libguile/init.c:353
#22 0x800c90a1 in scm_internal_lazy_catch (tag=-2147280577, 
body=0x8009f0cc , body_data=0x8003193f, 
handler=0x8003193f , handler_data=0x8005be98)
at ../../guile-1.4/libguile/throw.c:283
#23 0x8009ef8b in scm_boot_guile_1 (base=0x8047c68, closure=0x8047c6c)
at ../../guile-1.4/libguile/init.c:600
#24 0x8009efec in scm_boot_guile () at ../../guile-1.4/libguile/init.c:443
#25 0x8049fd5 in main () at ../../guile-1.4/libguile/guile.c:76
#26 0x8049ebb in _start ()

___
Bug-guile mailing list
[EMAIL PROTECTED]
http://mail.gnu.org/mailman/listinfo/bug-guile



Re: boot-9 `define' failure

2001-05-14 Thread Dirk Herrmann

On Mon, 14 May 2001, Golubev I. N. wrote:

> Any attempt to run `guile' terminates with `ERROR: Unbound variable:
> noop'.  In gdb it appears that error happens in `(define return-it
> noop)' in `ice-9/boot-9.scm'.  Scheme value is what is printed by
> `scm_display' for value received by `scm_eval_x'.  File name is from
> `scm_load_startup_files' source.

Thanks for the report.  However, I can only assume that it somehow depends
on the set of configure options.  In any case, I'd rather suggest you use
a recent CVS snapshot, since it is probably already quite close to the
next release, and there won't be too many changes.

Best regards,
Dirk Herrmann


___
Bug-guile mailing list
[EMAIL PROTECTED]
http://mail.gnu.org/mailman/listinfo/bug-guile



Re: boot-9 `define' failure

2001-05-14 Thread Golubev I. N.

> I'd rather suggest you use a recent CVS snapshot

It builds and it is all the same there.  What should I look at with
gdb?

___
Bug-guile mailing list
[EMAIL PROTECTED]
http://mail.gnu.org/mailman/listinfo/bug-guile



guile-1.3 ported to mips-compaq-nonstopux

2001-05-14 Thread Tom Bates


Just a note to say I've ported guile-1.3 to mips-compaq-nonstopux. 
I had to make some changes though.
The modified files are:
./config.guess
./config.sub
./ltconfig
./ltmain.sh
./libguile/filesys.c
How should I get these into the source base?
Thanks,
Tom
--
"A democracy cannot exist as a permanent form of government.  It can
only exist until the voters discover that they can vote themselves
largesse from the public treasury.  From that moment on, the majority
always votes for the candidates promising the most benefits from the
public treasury with the result that a democracy always collapses over
loose fiscal policy, followed always by a dictatorship.  The average
age of the world's greatest civilizations has been 200 years."
--Alexander Fraser Tytler
 


use-modules does not signal error on non-existing modules

2001-05-14 Thread Martin Grabmueller

Hello list,

I suppose this is related to the recent module system changes:

mgrabmue@tortoise (~/cvs/guile/guile-core/libguile): 
GUILE_LOAD_PATH=/home/mgrabmue/cvs/guile/guile-core ./guile
guile> (use-modules (definitely not installed module))
guile> (use-modules (please signal a file-not-found error or something else))
guile> 

Regards,
  'martin

___
Bug-guile mailing list
[EMAIL PROTECTED]
http://mail.gnu.org/mailman/listinfo/bug-guile



Re: guile-1.3 ported to mips-compaq-nonstopux

2001-05-14 Thread Marius Vollmer

Tom Bates <[EMAIL PROTECTED]> writes:

> Just a note to say I've ported guile-1.3 to mips-compaq-nonstopux.
> I had to make some changes though.

Great!  To get your changes into mainstream Guile, you would have to
port the current CVS version and send us patches.  If the patches are
significant, we would also need some paper work from you so that we
can distribute your work.

___
Bug-guile mailing list
[EMAIL PROTECTED]
http://mail.gnu.org/mailman/listinfo/bug-guile



Re: use-modules does not signal error on non-existing modules

2001-05-14 Thread Marius Vollmer

Martin Grabmueller <[EMAIL PROTECTED]> writes:

> Hello list,
> 
> I suppose this is related to the recent module system changes:
> 
> mgrabmue@tortoise (~/cvs/guile/guile-core/libguile): 
>GUILE_LOAD_PATH=/home/mgrabmue/cvs/guile/guile-core ./guile
> guile> (use-modules (definitely not installed module))
> guile> (use-modules (please signal a file-not-found error or something else))
> guile> 

Right, Guile used to issue a "no such module" error.  It doesn't
becvause `resolve-interface' construct a interface when the module
doesn't already have one.  I think the whole logic how it is decided
whether a module exists or not could need some clean up.

___
Bug-guile mailing list
[EMAIL PROTECTED]
http://mail.gnu.org/mailman/listinfo/bug-guile



Re: `-' and zero arguments

2001-05-14 Thread Marius Vollmer

Dirk Herrmann <[EMAIL PROTECTED]> writes:

> [zero argument methods]
>
> It's not usefull, right.  But, does it do any harm?

I don't know.  Let's just leave it as it is.

___
Bug-guile mailing list
[EMAIL PROTECTED]
http://mail.gnu.org/mailman/listinfo/bug-guile