Re: Problem with (eq? ...) and Serveez

[Stephen Compall]

Stephen Compall <address@hidden> writes:

> SCM
> guile_socket_equalp (SCM self_scm, SCM other_scm)
> {
>   return SCM_SMOB_DATA (self_scm) == SCM_SMOB_DATA (other_scm);
> }

Well, you'd have to convert that C boolean to SCM, duh.

return (SCM_SMOB_DATA (self_scm) == SCM_SMOB_DATA (other_scm))
         ? SCM_BOOL_T : SCM_BOOL_F;

--
Stephen Compall or s11 or sirian

"...very few phenomena can pull someone out of Deep Hack Mode, with two
noted exceptions: being struck by lightning, or worse, your *computer*
being struck by lightning."
(By Matt Welsh)

global digicash CISU Europol USDOJ SCUD missile UOP militia
cryptanalysis supercomputer Janet Reno Rand Corporation CIA INS Arnett