sapphire-lang 0.6.0

Gradually typed scripting language where every value is an object and types are optional, checked at runtime
Documentation 
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
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77

# classes.spr — class definitions, fields, methods, inheritance, super

class Shape {
  attr color = "red"

  def describe() {
    "A #{self.color} shape"
  }

  def area() {
    0
  }
}

class Rectangle < Shape {
  attr width: Int
  attr height: Int

  def area() {
    self.width * self.height
  }

  def describe() {
    super.describe() + " (rectangle #{self.width}x#{self.height})"
  }
}

class Circle < Shape {
  attr radius: Int

  def area() {
    # integer approximation
    3 * self.radius * self.radius
  }

  def describe() {
    super.describe() + " (circle r=#{self.radius})"
  }
}

r = Rectangle.new(width: 4, height: 5)
print r.describe()
print "Area: #{r.area()}"

c = Circle.new(color: "blue", radius: 3)
print c.describe()
print "Area: #{c.area()}"

# Field mutation via methods
class Counter {
  attr n = 0

  def inc() {
    self.n = self.n + 1
  }

  def reset() {
    self.n = 0
  }

  def value() {
    self.n
  }
}

counter = Counter.new()
counter.inc()
counter.inc()
counter.inc()
print "Counter: #{counter.value()}"
counter.reset()
print "After reset: #{counter.value()}"

# is_a? type checking
print r.is_a?(Rectangle)
print r.is_a?(Shape)
print r.is_a?(Circle)