← Back to branch summary

~jsvoboda/helenos/sysel

« back to all changes in this revision

Viewing changes to uspace/dist/src/sysel/demos/map.sy

  • Committer: Jiri Svoboda
  • Date: 2010-05-08 08:10:44 UTC
  • Revision ID: jiri@wiwaxia-20100508081044-5hvcjwu15rsfvgnv
Update SBI to rev. 244.

Show diffs side-by-side

added added

removed removed

Lines of Context:
uspace/dist/src/sysel/demos/map.sy
 
1
--
 
2
-- Copyright (c) 2010 Jiri Svoboda
 
3
-- All rights reserved.
 
4
--
 
5
-- Redistribution and use in source and binary forms, with or without
 
6
-- modification, are permitted provided that the following conditions
 
7
-- are met:
 
8
--
 
9
-- o Redistributions of source code must retain the above copyright
 
10
--   notice, this list of conditions and the following disclaimer.
 
11
-- o Redistributions in binary form must reproduce the above copyright
 
12
--   notice, this list of conditions and the following disclaimer in the
 
13
--   documentation and/or other materials provided with the distribution.
 
14
-- o The name of the author may not be used to endorse or promote products
 
15
--   derived from this software without specific prior written permission.
 
16
--
 
17
-- THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 
18
-- IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 
19
-- OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 
20
-- IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
 
21
-- INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 
22
-- NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 
23
-- DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 
24
-- THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 
25
-- (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
 
26
-- THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 
27
--
 
28
 
 
29
-- Using the Map class from the library.
 
30
class MapDemo is
 
31
        fun Main() is
 
32
                var map : Map/string/int;
 
33
 
 
34
                map = new Map/string/int();
 
35
 
 
36
                map["one"] = 1;
 
37
                map["two"] = 2;
 
38
                map["three"] = 3;
 
39
                map["four"] = 4;
 
40
 
 
41
                Builtin.WriteLine(map["one"]);
 
42
                Builtin.WriteLine(map["two"]);
 
43
                Builtin.WriteLine(map["three"]);
 
44
                Builtin.WriteLine(map["four"]);
 
45
        end
 
46
end