char error_message[1024];

	GetString(error_message, STR_ERROR_AI_NO_AI_FOUND, lastof(error_message));

	/* 2) We construct the AI's code. This is done by merging a header, body and footer */

	char dummy_script[4096];

	char *dp = dummy_script;

	/* As special trick we need to split the error message on newlines and

	 * emit each newline as a separate error printing string. */

	char *newline;

	char *p = error_message;

	do {

		int32 item_current = this->item_next;

		FindNext();

		return item_current;

	}

		this->bucket_list = NULL;

		this->has_no_more_items = true;

		this->item_next = 0;

	}

	void FindNext()

		int32 item_current = this->item_next;

		FindNext();

		return item_current;

	}

		if (!this->HasNext()) return;

		/* If we remove the 'next' item, skip to the next */

		if (item == this->item_next) {

			FindNext();

			return;

	 * @note You can write your own valuators and use them. Just remember that

	 *  the first parameter should be the index-value, and it should return

	 *  an integer.

	 * @note Example:

	 *  list.Valuate(AIBridge.GetPrice, 5);

	 *  list.Valuate(AIBridge.GetMaxLength);

	 *    return myparam * bridge_id; // This is silly

	 *  }

	 *  list.Valuate(MyVal, 12);

	 */

	void Valuate(void *valuator_function, int params, ...);

#endif /* DOXYGEN_SKIP */

/* static */ void AIError::RegisterErrorMapString(AIErrorType ai_error_msg, const char *message)

{

	error_map_string[ai_error_msg] = message;

}

	return (AIError::ErrorCategories)(GetLastError() >> (uint)ERR_CAT_BIT_SIZE);

}

void AIList::RemoveItem(int32 item)

{

	AIAbstractList::RemoveItem(item);

}

	if (sq_gettype(vm, 2) != OT_INTEGER) return SQ_ERROR;

	if (sq_gettype(vm, 3) != OT_INTEGER || sq_gettype(vm, 3) == OT_NULL) {

		return sq_throwerror(vm, _SC("you can only assign integers to this list"));

	}

	SQInteger idx, val;

# to export the AI API to Squirrel.

#

# Note that arrays are 1 based...

#

# Simple insertion sort.

	for (i = 2; i <= ELEMENTS; i++)

		for (j = i; ARRAY[j - 1] > ARRAY[j]; --j) {

			temp = ARRAY[j]

			ARRAY[j] = ARRAY[j - 1]

			ARRAY[j - 1] = temp

	}

	return

}

	print "	template <> "       name " *GetParam(ForceType<"       name " *>, HSQUIRRELVM vm, int index, SQAutoFreePointers *ptr) { SQUserPointer instance; sq_getinstanceup(vm, index, &instance, 0); return  (" name " *)instance; }"

	print "	template <> "       name " &GetParam(ForceType<"       name " &>, HSQUIRRELVM vm, int index, SQAutoFreePointers *ptr) { SQUserPointer instance; sq_getinstanceup(vm, index, &instance, 0); return *(" name " *)instance; }"

	print "	template <> const " name " *GetParam(ForceType<const " name " *>, HSQUIRRELVM vm, int index, SQAutoFreePointers *ptr) { SQUserPointer instance; sq_getinstanceup(vm, index, &instance, 0); return  (" name " *)instance; }"

	print "	template <> const " name " &GetParam(ForceType<const " name " &>, HSQUIRRELVM vm, int index, SQAutoFreePointers *ptr) { SQUserPointer instance; sq_getinstanceup(vm, index, &instance, 0); return *(" name " *)instance; }"

	if (name == "AIEvent") {

		print "	template <> int Return<" name " *>(HSQUIRRELVM vm, " name " *res) { if (res == NULL) { sq_pushnull(vm); return 1; } Squirrel::CreateClassInstanceVM(vm, \"" name "\", res, NULL, DefSQDestructorCallback<" name ">); return 1; }"

		this->update_left  = true;

		this->update_right = true;

		this->init_lists   = true;

		this->SetDirty();

	}

		this->vscroll.UpdateCapacity(delta.y / (int)this->resize.step_height);

		this->vscroll2.UpdateCapacity(delta.y / (int)this->resize.step_height);

		Widget *widget = this->widget;

		widget[RVW_WIDGET_LEFT_MATRIX].data = widget[RVW_WIDGET_RIGHT_MATRIX].data = (this->vscroll.GetCapacity() << MAT_ROW_START) + (1 << MAT_COL_START);

 *   AYSTAR_NO_PATH : indicates that there was no path found.

 *   AYSTAR_STILL_BUSY : indicates we have done some checked, that we did not found the path yet, and that we still have items left to try.

 * When the algorithm is done (when the return value is not AYSTAR_STILL_BUSY)

 * aystar->clear() is called. Note that when you stop the algorithm halfway,

 * you should still call clear() yourself!

 */

	int r, i = 0;

	/* Loop through the OpenList

	 *  Quit if result is no AYSTAR_STILL_BUSY or is more than loops_per_tick */

	while ((r = aystar->loop(aystar)) == AYSTAR_STILL_BUSY && (aystar->loops_per_tick == 0 || ++i < aystar->loops_per_tick)) { }

#ifdef AYSTAR_DEBUG

	switch (r) {

 * Create stub implementations for all receive commands that only

 * show a warning that the given command is not available for the

 * socket where the packet came from.

 * @param type the packet type to create the stub for

 */

#define DEFINE_UNAVAILABLE_CONTENT_RECEIVE_COMMAND(type) \

	DEBUG(net, 0, "[tcp/content] received illegal packet type %d from %s", \

			type, this->client_addr.GetAddressAsString()); \

	return false; \

}

DEFINE_UNAVAILABLE_CONTENT_RECEIVE_COMMAND(PACKET_CONTENT_CLIENT_INFO_LIST);

	ScenarioEditorLandscapeGenerationWindow(const WindowDesc *desc, WindowNumber window_number) : Window()

	{

		this->InitNested(desc, window_number);

		this->GetWidget<NWidgetCore>(ETTW_PLACE_DESERT_LIGHTHOUSE)->tool_tip = (_settings_game.game_creation.landscape == LT_TROPIC) ? STR_TERRAFORM_TOOLTIP_DEFINE_DESERT_AREA : STR_TERRAFORM_TOOLTIP_PLACE_LIGHTHOUSE;

	}

		this->DrawWidgets();

		if (this->IsWidgetLowered(ETTW_LOWER_LAND) || this->IsWidgetLowered(ETTW_RAISE_LAND)) { // change area-size if raise/lower corner is selected

			SetTileSelectSize(_terraform_size, _terraform_size);

		}

	}

	/**

	 * Height map accessor

	 * @param x X position

	 * @param y Y position

	 * @return height as fixed point number

	 */

		return h[x + y * dim_x];

	}

};

/** Global height map instance */

static HeightMap _height_map = {NULL, 0, 0, 0, 0};

	SpriteID image;

};

#include "table/water_land.h"

static void DrawWaterStuff(const TileInfo *ti, const WaterDrawTileStruct *wdts,

{

	SpriteID image;

	SpriteID water_base = GetCanalSprite(CF_WATERSLOPE, ti->tile);

	SpriteID locks_base = GetCanalSprite(CF_LOCKS, ti->tile);

	/* If no custom graphics, use defaults */

	assert((tileh != SLOPE_EW) && (tileh != SLOPE_NS)); // No suitable sprites for current flooding behaviour

	DrawGroundSprite(SPR_SHORE_BASE + tileh_to_shoresprite[tileh], PAL_NONE);

}

	switch (GetWaterClass(ti->tile)) {

		case WATER_CLASS_SEA:   DrawSeaWater(ti->tile); break;

		case WATER_CLASS_CANAL: DrawCanalWater(ti->tile); break;

		case WATER_CLASS_RIVER: DrawRiverWater(ti); break;

		default: NOT_REACHED();

	}