1
for <[email protected]>; Mon, 11 Feb 2008 04:27:48 -0700
Received: from [132.175.109.14] by sentry.sandia.gov with ESMTP (SMTP
Relay 01 (Email Firewall v6.3.1)); Mon, 11 Feb 2008 04:27:38 -0700
X-Server-Uuid: AA8306FD-23D1-4E5B-B133-B2D9F10C3631
X-WSS-ID: 0JW2NU3-07-3FL-01
X-TMWD-Spam-Summary: TS=3D20080211112739; ID=3D1; SEV=3D2.3.2;
DFV=3DB2008021107; IFV=3D2.0.4,4.0-9; AIF=3DB2008021107; RPD=3D5.03.0010;
ENG=3DNA;
RPDID=3D7374723D303030312E30413031303230362E34374230333132412E303041422C73=
733D312C6667733D30;
CAT=3DNONE; CON=3DNONE; SIG=3DAAAAAAAAAAAAAAAAwYgcHgAABA=3D=3D
X-TMWD-IP-Reputation: SIP=3D193.136.28.30;
IPRID=3D303030312E30413039303330312E34374230333132382E30303630; CTCLS=3DT1=
;
CAT=3DUnknown
Received: from smtp1.fe.up.pt (smtp.fe.up.pt [193.136.28.30]) by
sentry-two.sandia.gov (Tumbleweed MailGate 3.5.1) with ESMTP id
280E68EAABA for <[email protected]>; Mon, 11 Feb 2008 04:27:38
-0700 (MST)
Received: from localhost (localhost [127.0.0.1]) by smtp1.fe.up.pt (
Postfix) with ESMTP id DF590EF98A for <[email protected]>; Mon, 11
Feb 2008 11:26:55 +0000 (WET)
Received: from smtp1.fe.up.pt ([127.0.0.1]) by localhost (smtp1.fe.up.pt
[127.0.0.1]) (amavisd-new, port 10024) with ESMTP id 3dwzksKdYwbH for
<[email protected]>; Mon, 11 Feb 2008 11:26:55 +0000 (WET)
Received: from [127.0.0.1] (unknown [192.168.56.20]) by smtp1.fe.up.pt (
Postfix) with ESMTP id C7B48EF989 for <[email protected]>; Mon, 11
Feb 2008 11:26:55 +0000 (WET)
Message-ID: <[EMAIL PROTECTED]>
Date: Mon, 11 Feb 2008 11:27:29 +0000
From: "Henrique Lopes Cardoso" <[EMAIL PROTECTED]>
User-Agent: Thunderbird 2.0.0.9 (Windows/20071031)
MIME-Version: 1.0
To: [email protected]
Subject: Setting defaults
X-WSS-ID: 6BAEEEA047S602199-01-01
Content-Type: text/plain;
charset=3Diso-8859-1;
format=3Dflowed
Content-Transfer-Encoding: 7bit
X-PMX-Version: 5.4.0.320885, Antispam-Engine: 2.5.2.313940, Antispam-Data: =
2008.2.11.31534
X-PerlMx-Spam: Gauge=3DIIIIIII, Probability=3D7%, Report=3D'BODY_SIZE_300_3=
99 0, __CT 0, __CTE 0, __CT_TEXT_PLAIN 0, __HAS_MSGID 0, __MIME_TEXT_ONLY 0=
, __MIME_VERSION 0, __SANE_MSGID 0, __USER_AGENT 0'
Hi,
I was wondering if there is a way of setting a default value for a slot
to be equal to another slot.
Something like:
(deftemplate foo
(slot bar)
(slot qwe (default-dynamic this.bar))))
(assert (foo (bar 1)))
Slot qwe would get the value of slot bar, that is, 1.
Thanks.
Henrique
--------------------------------------------------------------------
To unsubscribe, send the words 'unsubscribe jess-users [EMAIL PROTECTED]'
in the BODY of a message to [EMAIL PROTECTED], NOT to the list
(use your own address!) List problems? Notify [EMAIL PROTECTED]
--------------------------------------------------------------------