Added a tpool module that implements a global pool for generic types, so we
can merge duplicate ones and assign them global ids. git-svn-id: svn://svn.cc65.org/cc65/trunk@5262 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
71
src/ld65/tpool.c
Normal file
71
src/ld65/tpool.c
Normal file
@@ -0,0 +1,71 @@
|
||||
/*****************************************************************************/
|
||||
/* */
|
||||
/* tpool.c */
|
||||
/* */
|
||||
/* Pool for generic types */
|
||||
/* */
|
||||
/* */
|
||||
/* */
|
||||
/* (C) 2011, Ullrich von Bassewitz */
|
||||
/* Roemerstrasse 52 */
|
||||
/* D-70794 Filderstadt */
|
||||
/* EMail: uz@cc65.org */
|
||||
/* */
|
||||
/* */
|
||||
/* This software is provided 'as-is', without any expressed or implied */
|
||||
/* warranty. In no event will the authors be held liable for any damages */
|
||||
/* arising from the use of this software. */
|
||||
/* */
|
||||
/* Permission is granted to anyone to use this software for any purpose, */
|
||||
/* including commercial applications, and to alter it and redistribute it */
|
||||
/* freely, subject to the following restrictions: */
|
||||
/* */
|
||||
/* 1. The origin of this software must not be misrepresented; you must not */
|
||||
/* claim that you wrote the original software. If you use this software */
|
||||
/* in a product, an acknowledgment in the product documentation would be */
|
||||
/* appreciated but is not required. */
|
||||
/* 2. Altered source versions must be plainly marked as such, and must not */
|
||||
/* be misrepresented as being the original software. */
|
||||
/* 3. This notice may not be removed or altered from any source */
|
||||
/* distribution. */
|
||||
/* */
|
||||
/*****************************************************************************/
|
||||
|
||||
|
||||
|
||||
/* ld65 */
|
||||
#include "tpool.h"
|
||||
|
||||
|
||||
|
||||
/*****************************************************************************/
|
||||
/* Data */
|
||||
/*****************************************************************************/
|
||||
|
||||
|
||||
|
||||
/* The string pool we're using */
|
||||
StringPool* TypePool = 0;
|
||||
|
||||
|
||||
|
||||
/*****************************************************************************/
|
||||
/* Code */
|
||||
/*****************************************************************************/
|
||||
|
||||
|
||||
|
||||
void InitTypePool (void)
|
||||
/* Initialize the type pool */
|
||||
{
|
||||
/* Allocate a type pool */
|
||||
TypePool = NewStringPool (137);
|
||||
|
||||
/* We insert the empty string as first entry here, so it will have id
|
||||
* zero.
|
||||
*/
|
||||
SP_AddStr (TypePool, "");
|
||||
}
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user