From mboxrd@z Thu Jan  1 00:00:00 1970
Path: main.gmane.org!not-for-mail
From: P Pareit <pieter.pareit@planetinternet.be>
Newsgroups: gmane.lisp.guile.user
Subject: Re: [guile/scwm] 2nd argument problem to scm_definedp()
Date: Tue, 17 Sep 2002 15:53:35 +0200
Sender: guile-user-admin@gnu.org
Message-ID: <200209171553.35147.pieter.pareit@planetinternet.be>
References: <200209162049.54095.pieter.pareit@planetinternet.be> <87sn09lo1i.fsf@zagadka.ping.de> <200209171125.17679.pieter.pareit@planetinternet.be>
NNTP-Posting-Host: localhost.gmane.org
Mime-Version: 1.0
Content-Type: text/plain;
  charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
X-Trace: main.gmane.org 1032270790 26214 127.0.0.1 (17 Sep 2002 13:53:10 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Tue, 17 Sep 2002 13:53:10 +0000 (UTC)
Return-path: <guile-user-admin@gnu.org>
Original-Received: from monty-python.gnu.org ([199.232.76.173])
	by main.gmane.org with esmtp (Exim 3.35 #1 (Debian))
	id 17rImq-0006of-00
	for <guile-user@m.gmane.org>; Tue, 17 Sep 2002 15:53:08 +0200
Original-Received: from localhost ([127.0.0.1] helo=monty-python.gnu.org)
	by monty-python.gnu.org with esmtp (Exim 4.10)
	id 17rImz-0007Dj-00; Tue, 17 Sep 2002 09:53:17 -0400
Original-Received: from list by monty-python.gnu.org with tmda-scanned (Exim 4.10)
	id 17rIm7-00070g-00
	for guile-user@gnu.org; Tue, 17 Sep 2002 09:52:23 -0400
Original-Received: from mail by monty-python.gnu.org with spam-scanned (Exim 4.10)
	id 17rIm5-000704-00
	for guile-user@gnu.org; Tue, 17 Sep 2002 09:52:22 -0400
Original-Received: from riker.skynet.be ([195.238.3.89])
	by monty-python.gnu.org with esmtp (Exim 4.10)
	id 17rIm5-0006zm-00
	for guile-user@gnu.org; Tue, 17 Sep 2002 09:52:21 -0400
Original-Received: from localhost.localdomain (196.91-136-217.adsl.skynet.be [217.136.91.196])
	by riker.skynet.be (8.11.6/8.11.6/Skynet-OUT-2.20) with ESMTP id g8HDqBf13032
	for <guile-user@gnu.org>; Tue, 17 Sep 2002 15:52:11 +0200 (MET DST)
	(envelope-from <pieter.pareit@planetinternet.be>)
Original-To: guile-user@gnu.org
User-Agent: KMail/1.4.2
In-Reply-To: <200209171125.17679.pieter.pareit@planetinternet.be>
Errors-To: guile-user-admin@gnu.org
X-BeenThere: guile-user@gnu.org
X-Mailman-Version: 2.0.11
Precedence: bulk
List-Help: <mailto:guile-user-request@gnu.org?subject=help>
List-Post: <mailto:guile-user@gnu.org>
List-Subscribe: <http://mail.gnu.org/mailman/listinfo/guile-user>,
	<mailto:guile-user-request@gnu.org?subject=subscribe>
List-Id: General Guile related discussions <guile-user.gnu.org>
List-Unsubscribe: <http://mail.gnu.org/mailman/listinfo/guile-user>,
	<mailto:guile-user-request@gnu.org?subject=unsubscribe>
List-Archive: <http://mail.gnu.org/pipermail/guile-user/>
Xref: main.gmane.org gmane.lisp.guile.user:1002
X-Report-Spam: http://spam.gmane.org/gmane.lisp.guile.user:1002

On Tuesday 17 September 2002 11:25 am, P Pareit wrote:

<snip>
> #include <stdio.h>
> #include <libguile.h>
>
> void init_load_path(void)
> {
>   SCM path;
>
>   path =3D scm_c_lookup("%load-path");
>   path =3D scm_cons(scm_makfrom0str("/usr/local/share/scwm/modules"),
>                   path);
>   scm_c_define("%load-path", path);
> }

Thanks to the help of dsmith, this is already fixed:

void init_load_path(void)
{
  SCM path =3D scm_c_lookup("%load-path");

  SCM_VARIABLE_SET(path,=20
scm_cons(scm_makfrom0str("/usr/local/share/scwm/modules"),
=09=09  SCM_VARIABLE_REF(path)));
}

Maybe someone can document SCM_VARIABLE_SET and SCM_VARIABLE_REF?

pieter;



_______________________________________________
Guile-user mailing list
Guile-user@gnu.org
http://mail.gnu.org/mailman/listinfo/guile-user