SC2Mapster

/*
 * Grape stdlib - system package - contains base classes for interop with SC2
 * Copyright (c) 2011 Grape Team. All rights reserved.
 * 
 * The Grape programming language and stdlib are released under the BSD license.
 */

package system.collections

class list inherits abstract_enumerable:
	static int maximum_items = 2000

	private static int default_capacity = 4
	private static object[maximum_items] empty_array
	private object[maximum_items] items
	private int size
	private int version

	void add(object item):
		if size >= maximum_items:
			throw new memory_limit_exceeded_exception("The amount of items in the list has exceeded the maximum amount of items a list can contain. If you need more memory available, raise the system.collections.list.maximum_items member.")
		
		size = size + 1
		items[size] = item
		version = version + 1
	
	void add_range(abstract_enumerable collection):
		insert_range(size, collection)
	
	void clear():
		if size > 0:
			int index = 0
			while index < size:
				items[index] = null
				index = index + 1
			
			size = 0
		
		version = version + 1

	bool contains(object item):
		int index = 0
		while index < size:
			if items[index].equals(item):
				return true
			
			index = index + 1
		
		return false

	int index_of(object item):
		return index_of(item, 0)
	
	int index_of(object item, int start_index):
		if start_index > size:
			throw new argument_out_of_range_exception("start_index")
		
		return index_of(item, start_index, size - start_index)
	
	int index_of(object item, int start_index, int count):
		if start_index > size:
			throw new argument_out_of_range_exception("start_index")
		
		if count < 0 || start_index > size - count:
			throw new argument_out_of_range_exception("count")
		
		int max = start_index + count
		int index = start_index
		while index < max:
			if items[index].equals(item):
				return index
			
			index = index + 1
		
		return -1
	
	void insert(int index, object item):
		if index > size:
			throw new argument_out_of_range_exception("index")
		
		items[index] = item
		size = size + 1
		version = version + 1
	
	void insert_range(int index, abstract_enumerable collection):
		if index > size:
			throw new argument_out_of_range_exception("index")
		
		if collection == null:
			throw new argument_null_exception("collection")
		
		abstract_enumerator enum = collection.get_enumerator()
		while enum.move_next():
			insert(index, enum.get_current())
			index = index + 1
		
		version = version + 1
	
	int last_index_of(object item):
		return last_index_of(item, size - 1, size)
	
	int last_index_of(object item, int start_index):
		if start_index >= size:
			throw new argument_out_of_range_exception("start_index")
		
		return last_index_of(item, start_index, start_index + 1)
	
	int last_index_of(object item, int start_index, int count):
		if size == 0:
			return -1
		
		if start_index < 0 || start_index >= size:
			throw new argument_out_of_range_exception("start_index")
		
		if count < 0 || count > start_index + 1:
			throw new argument_out_of_range_exception("count")
		
		int min = (start_index - count) + 1
		int index = start_index
		while index >= min:
			if items[index].equals(item):
				index = index - 1
		
		return -1
	
	bool remove(object item):
		int index = index_of(item)
		if index >= 0:
			remove_at(index)
			return true
		
		return false
	
	void remove_all():
		int index = 0
		while index < size:
			items[index] = null
			index = index + 1
			size = size - 1
		
		version = version + 1
	
	void remove_at(int index):
		if index >= size:
			throw new argument_out_of_range_exception("index")
		
		size = size - 1
		items[index] = null
		version = version + 1
	
	void remove_range(int start_index, int count):
		if start_index < 0:
			throw new argument_out_of_range_exception("start_index")
		
		if count < 0:
			throw new argument_out_of_range_exception("count")
		
		if size - start_index < count:
			throw new invalid_operation_exception("")
		
		if count > 0:
			size = size - count
			int index = start_index
			while index < count:
				items[index] = null
				index = index + 1
			
			version = version + 1
	
	override abstract_enumerator get_enumerator():
		return new list.enumerator(this)
	
	object get_item_at_index(int index):
		if index >= size:
			throw new argument_out_of_range_exception("index")
		
		return items[index]
	
	void set_item_at_index(int index, object value):
		if index >= size:
			throw new argument_out_of_range_exception("index")
		
		items[index] = value
		version = version + 1
	
	int get_count():
		return size
	
	ctor list():
		pass

	ctor list(abstract_enumerable collection):
		if collection == null:
			throw new argument_null_exception("collection")
		
		items = empty_array
		add_range(collection)
	
	public class enumerator inherits abstract_enumerator:
		private list l
		private int index
		private int version
		private object current

		void dispose():
			pass

		override bool move_next():
			if version == l.version && index < l.size:
				current = l.items[index]
				index = index + 1
				return true
			
			return move_next_rare()
		
		private bool move_next_rare():
			if version != l.version:
				throw new invalid_operation_exception("list.enumerator.version and list.enumerator.l.version do not match.")
			
			index = l.size + 1
			current = null
			return false
		
		override object get_current():
			return current
		
		override void reset():
			if version != l.version:
				throw new invalid_operation_exception("list.enumerator.version and list.enumerator.l.version do not match.")
			
			index = 0
			current = null
		
		internal ctor enumerator(list l):
			this.l = l
			this.index = 0
			this.version = l.version
			this.current = null

/*
 * Grape stdlib - system package - contains base classes for interop with SC2
 * Copyright (c) 2011 Grape Team. All rights reserved.
 * 
 * The Grape programming language and stdlib are released under the BSD license.
 */

 package system

 class transmissionsource_base:
	static int invalid_transmission_id = c_invalidTransmissionId
	static fixed transition_duration = c_transmissionTransitionDuration

	class transmission_durations:
		static int duration_default = c_transmissionDurationDefault
		static int duration_add = c_transmissionDurationAdd
		static int duration_subtract = c_transmissionDurationSub
		static int duration_set = c_transmissionDurationSet
	
	static transmissionsource create():
		return TransmissionSource()
	
	static transmissionsource create_from_unit(unit u, bool flash, bool override_portrait, string animation):
		return TransmissionSourceFromUnit(u, flash, override_portrait, animation)
	
	static transmissionsource create_from_unit_type(string unit_type, bool override_portrait):
		return TransmissionSourceFromUnitType(unit_type, override_portrait)
	
	static transmissionsource create_from_model(string model_link):
		return TransmissionSourceFromModel(model_link)

	static transmissionsource create_from_movie(string asset_link, bool subtitles):
		TransmissionSourceFromMovie(asset_link, subtitles)
	
	int send(playergroup players, int target_portrait, string animation, soundlink sound_link, text speaker, text subtitle, fixed duration, int duration_type, bool wait_until_done):
		return TransmissionSend(players, this, target_portrait, animation, sound_link, speaker, subtitle, duration, duration_type, wait_until_done)
	
	void clear(int type):
		TransmissionClear(type)
	
	void clear_all():
		TransmissionClearAll()
	
	void set_option(int option_index, bool value):
		TransmissionSetOption(option_index, value)
	
	void wait(int type, fixed offset):
		TransmissionWait(type, offset)
	
	private ctor transmissionsource_base():
		pass

class my_sample_class[500]:
    ctor my_sample_class():
        pass

unit z = null // compile error
unit? z = null // ok
unit?[10] units //question mark = this type is nullable
//...
unit u = units[3] //compile error, wrong type
unit u = units[3].Value // use "Value" to get the actual value, exception when value is null
if units[3].HasValue :
	unit u = units[3].Value //now it is safe to get the value
	unit? v = u // automatic cast to nullable type


list a = new list()
list? b = new list()
// ....
a.add(1) // cannot throw nullpointer exception because a cannot be null
b.add(2) // can throw nullpointer exception
b?.add(3) // safe invoke, no exception is thrown if b is null, it just has no effect

class A: 
	string foo():
		return "A"
		
class B inherits A:		
	string foo():
		return "B"

class C:
	static string foo(A a):
		return "A"
		
	static string foo(B b);
		return "B";
			
class Test:
	A a = new B();
	string x = a.foo() // x is now "B" ?
	string y = C.foo(a) // y is now "B" ?

if a() and b(c(), d()):

temp1 = a();
if (temp1) {
    temp2 = c();
    if (exceptionThrown()) {
        return; // if this statement is not in a try- block we can just 
                //exit the function, otherwise it would be even more complicated
    }
    temp1 = a(temp2, d());
}
if (temp1) {
    ...
}