Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse code

German multilang example

  • Loading branch information...
commit 5736708ee0a1b5c0e3702edaa54ca1744fd6d76f 1 parent 84daaa4
Michael Kohl authored
22 examples/multilang/german/account.ik
... ... @@ -0,0 +1,22 @@
  1 +use("german")
  2 +
  3 +Konto = Ursprung imitiere mach(
  4 + überweise = methode(betrag, von: self, an:,
  5 + von kontostand -= betrag
  6 + an kontostand += betrag
  7 + )
  8 +
  9 + schreib = methode(
  10 + "<Kontoinhaber: #{name} Kontostand: #{kontostand}>" schreib_zeile
  11 + )
  12 +)
  13 +
  14 +Peter = Konto mit(name: "Peter", kontostand: 142.0)
  15 +Maria = Konto mit(name: "Maria", kontostand: 45.7)
  16 +
  17 +Konto überweise(23.0, von: Peter, an: Maria)
  18 +Konto überweise(10.0, an: Peter, von: Maria)
  19 +Maria überweise(57.4, an: Peter)
  20 +
  21 +Peter schreib
  22 +Maria schreib
15 examples/multilang/german/german.ik
... ... @@ -0,0 +1,15 @@
  1 +
  2 +GermanDefaultBehavior = Reflector other:mimic(DefaultBehavior)
  3 +
  4 +GermanDefaultBehavior imitiere = cell(:mimic)
  5 +GermanDefaultBehavior falls = cell(:if)
  6 +GermanDefaultBehavior methode = cell(:method)
  7 +GermanDefaultBehavior funktion = cell(:fn)
  8 +GermanDefaultBehavior Ursprung = Origin
  9 +GermanDefaultBehavior mach = cell(:do)
  10 +GermanDefaultBehavior mit = cell(:with)
  11 +GermanDefaultBehavior selbst = method(self)
  12 +GermanDefaultBehavior schreib = Origin cell(:print)
  13 +GermanDefaultBehavior schreib_zeile = Origin cell(:println)
  14 +
  15 +DefaultBehavior mimic!(GermanDefaultBehavior)

0 comments on commit 5736708

Please sign in to comment.
Something went wrong with that request. Please try again.