File: basicOperators.ke

package info (click to toggle)
rlvm 0.12-4
  • links: PTS
  • area: main
  • in suites: wheezy
  • size: 16,348 kB
  • sloc: cpp: 92,030; ansic: 39,532; perl: 768; python: 181; sh: 171; makefile: 7
file content (46 lines) | stat: -rw-r--r-- 1,358 bytes parent folder | download | duplicates (7)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
// This file is part of RLVM, a RealLive virtual machine clone.
//
// -----------------------------------------------------------------------
//
// Copyright (C) 2006 Elliot Glaysher
//
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// (at your option) any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA.
//
// -----------------------------------------------------------------------

// Test both the binary addition operator and the inplace one
intA[0] = 1 + 1
intA[1] = intA[0]
intA[1] += 1

// Test subtraction
intA[2] = 3 - intA[1]
intA[3] = 5
intA[3] -= 2

// Test multiplication
intA[4] = 2 * 5
intA[5] = intA[4]
intA[5] *= 3

// Test division
intA[6] = 20 / 2
intA[7] = intA[6]
intA[7] /= 5

// Test modulus
intA[8] = 8 % 3  // 2
intA[9] = 11
intA[9] %= 2