Example implemented from "The computer Language Benchmarks Game" - Thread-Ring

http://benchmarksgame.alioth.debian.org/

Complete description of the thread-ring : http://benchmarksgame.alioth.debian.org/u64q/threadring-description.html#threadring

Introduced classes

class ProxyThreadRing

actors :: ProxyThreadRing

class ThreadRing

actors :: ThreadRing

One Actor, who will receive the token

Redefined classes

redef class Sys

actors :: thread_ring $ Sys

The main class of the program.

All class definitions

class ProxyThreadRing

actors $ ProxyThreadRing

redef class Sys

actors :: thread_ring $ Sys

The main class of the program.

class ThreadRing

actors $ ThreadRing

One Actor, who will receive the token

Ancestors

module abstract_collection

core :: abstract_collection

Abstract collection classes and services.

module abstract_text

core :: abstract_text

Abstract class for manipulation of sequences of characters

module array

This module introduces the standard array structure.

module bitset

Services to handle BitSet

module bytes

Services for byte streams and arrays

module circular_array

core :: circular_array

Efficient data structure to access both end of the sequence.

module codec_base

core :: codec_base

Base for codecs to use with streams

module codecs

Group module for all codec-related manipulations

module collection

core :: collection

This module define several collection classes.

module concurrent_collections

pthreads :: concurrent_collections

Introduces thread-safe concurrent collections

module core

Standard classes and methods used by default by Nit programs and libraries.

module environ

core :: environ

Access to the environment variables of the process

module error

Standard error-management infrastructure.

module exec

Invocation and management of operating system sub-processes.

module extra

pthreads :: extra

Offers some POSIX threads services that are not available on all platforms

module file

File manipulations (create, read, write, etc.)

module fixed_ints

core :: fixed_ints

Basic integers of fixed-precision

module fixed_ints_text

core :: fixed_ints_text

Text services to complement fixed_ints

module flat

All the array-based text representations

module gc

Access to the Nit internal garbage collection mechanism

module hash_collection

core :: hash_collection

Introduce HashMap and HashSet.

module iso8859_1

core :: iso8859_1

Codec for ISO8859-1 I/O

module kernel

Most basic classes and methods.

module list

This module handle double linked lists

module math

Mathematical operations

module native

Native structures for text and bytes

module numeric

core :: numeric

Advanced services for Numeric types

module protocol

core :: protocol

module pthreads

pthreads :: pthreads

Main POSIX threads support and intro the classes Thread, Mutex and Barrier

module queue

Queuing data structures and wrappers

module range

Module for range of discrete objects.

module re

Regular expression support for all services based on Pattern

module ropes

Tree-based representation of a String.

module sorter

This module contains classes used to compare things and sorts arrays.

module stream

Input and output streams of characters

module string_search

core :: string_search

Basic string search, match and replace.

module text

All the classes and methods related to the manipulation of text entities

module time

Management of time and dates

module union_find

core :: union_find

union–find algorithm using an efficient disjoint-set data structure

module utf8

Codec for UTF-8 I/O

Parents

module actors

actors :: actors

Abstraction of the actors concepts

Children

module a_star-m

# Example implemented from "The computer Language Benchmarks Game" - Thread-Ring
# http://benchmarksgame.alioth.debian.org/
#
# Complete description of the thread-ring :
# http://benchmarksgame.alioth.debian.org/u64q/threadring-description.html#threadring
module thread_ring is example

import actors

# One Actor, who will receive the token
class ThreadRing
	actor

	# Identification of `self`
	var id: Int

	# The next Actor to which `self` send the token
	var next: ThreadRing is noinit

	# Receive a token, then send it to `next` unless its value is `0`
	fun send_token(message: Int) do
		if message == 0 then print id
		if message >= 1 then next.async.send_token(message - 1)
	end
end

redef class Sys
	# numbers of actors to create the ring
	var nb_actors = 503
end

var first = new ThreadRing(1)
var current = new ThreadRing(2)
first.next = current
for i in [3..nb_actors] do
	var t = new ThreadRing(i)
	current.next = t
	current = t
end
current.next = first
var n = if args.is_empty then 1000 else args[0].to_i
first.send_token(n)

lib/actors/examples/thread-ring/thread_ring.nit:15,1--56,19