~ubuntu-branches/ubuntu/gutsy/inform/gutsy

« back to all changes in this revision

Viewing changes to html/answers2/answer54.html

  • Committer: Bazaar Package Importer
  • Author(s): Mark Baker
  • Date: 2004-03-29 23:52:44 UTC
  • Revision ID: james.westby@ubuntu.com-20040329235244-fox1z1yv7d6vojoo
Tags: upstream-6.30
ImportĀ upstreamĀ versionĀ 6.30

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
<HTML><HEAD><TITLE>Answer to Exercise 54</TITLE></HEAD>
 
2
<BODY BGCOLOR="#FFFFFF">
 
3
<TABLE><TR><TD Valign="top"><IMG SRC="../icons/exercise.gif" ALT="??"><TD bgcolor="#FAA89B"><B>ANSWER TO EXERCISE 54</B><TR><TD><TD>
 
4
<P>
 
5
 
 
6
 
 
7
<PRE>
 
8
Class  Coin
 
9
  with name "coin" "coins//p",
 
10
       description "A round unstamped disc, presumably local currency.",
 
11
       list_together "coins",
 
12
       plural
 
13
       [;  print (string) (self.&#38;name)--&#62;0;
 
14
           if (~~(listing_together ofclass Coin)) print " coins";
 
15
       ],
 
16
       short_name
 
17
       [;  if (listing_together ofclass Coin)
 
18
           {   print (string) (self.&#38;name)--&#62;0; rtrue; }
 
19
       ],
 
20
       article
 
21
       [;  if (listing_together ofclass Coin) print "one"; else print "a";
 
22
       ];
 
23
Class  Gold_coin   class Coin with name "gold";
 
24
Class  Silver_coin class Coin with name "silver";
 
25
Class  Bronze_coin class Coin with name "bronze";
 
26
SilverCoin -&#62; "silver coin";
 
27
... and so on
 
28
</PRE>
 
29
 
 
30
</TABLE>
 
31
<HR>Back to <A HREF="../section23.html#ex54">the exercise in section 23</A><HR>
 
32
<SMALL><I>Mechanically translated to HTML from third edition as revised 16 May 1997. Copyright &#169; Graham Nelson 1993, 1994, 1995, 1996, 1997: all rights reserved.</I></SMALL></BODY></HTML>