Method DoAlloc

src/script/squirrel.cpp:76–102

* Internal helper to allocate the given amount of bytes. * @param requested_size The requested size. * @return The allocated memory. * @throws Script_FatalError When memory could not be allocated. */

	 * @throws Script_FatalError When memory could not be allocated.
	 */
	void *DoAlloc(SQUnsignedInteger requested_size)
	{
		try {
			void *p = this->allocator.allocate(requested_size);
			assert(p != nullptr);
			this->allocated_size += requested_size;

#ifdef SCRIPT_DEBUG_ALLOCATIONS
			assert(this->allocations.find(p) == this->allocations.end());
			this->allocations[p] = requested_size;
#endif
			return p;
		} catch (const std::bad_alloc &) {
			/* The OS did not have enough memory to allocate the object, regardless of the
			 * limit imposed by OpenTTD on the amount of memory that may be allocated. */
			if (this->error_thrown) {
				/* The allocation is called in the error handling of a memory allocation
				 * failure, then not being able to allocate that small amount of memory
				 * means there is no other choice than to bug out completely. */
				FatalError("Out of memory. Cannot allocate {} bytes", requested_size);
			}

			this->error_thrown = true;
			std::string msg = fmt::format("Out of memory. Cannot allocate {} bytes", requested_size);
			throw Script_FatalError(msg);
		}
	}

public:
	size_t GetAllocatedSize() const { return this->allocated_size; }