]> git.sur5r.net Git - cc65/blob - src/ca65/spool.c
Added a C header that translates from the source file's encoding to PetSCII.
[cc65] / src / ca65 / spool.c
1 /*****************************************************************************/
2 /*                                                                           */
3 /*                                  spool.c                                  */
4 /*                                                                           */
5 /*              Id and message pool for the ca65 macroassembler              */
6 /*                                                                           */
7 /*                                                                           */
8 /*                                                                           */
9 /* (C) 2003-2011, Ullrich von Bassewitz                                      */
10 /*                Roemerstrasse 52                                           */
11 /*                D-70794 Filderstadt                                        */
12 /* EMail:         uz@cc65.org                                                */
13 /*                                                                           */
14 /*                                                                           */
15 /* This software is provided 'as-is', without any expressed or implied       */
16 /* warranty.  In no event will the authors be held liable for any damages    */
17 /* arising from the use of this software.                                    */
18 /*                                                                           */
19 /* Permission is granted to anyone to use this software for any purpose,     */
20 /* including commercial applications, and to alter it and redistribute it    */
21 /* freely, subject to the following restrictions:                            */
22 /*                                                                           */
23 /* 1. The origin of this software must not be misrepresented; you must not   */
24 /*    claim that you wrote the original software. If you use this software   */
25 /*    in a product, an acknowledgment in the product documentation would be  */
26 /*    appreciated but is not required.                                       */
27 /* 2. Altered source versions must be plainly marked as such, and must not   */
28 /*    be misrepresented as being the original software.                      */
29 /* 3. This notice may not be removed or altered from any source              */
30 /*    distribution.                                                          */
31 /*                                                                           */
32 /*****************************************************************************/
33
34
35
36 /* ca65 */
37 #include "objfile.h"
38 #include "spool.h"
39
40
41
42 /*****************************************************************************/
43 /*                                   Data                                    */
44 /*****************************************************************************/
45
46
47
48 StringPool* StrPool = 0;
49
50
51
52 /*****************************************************************************/
53 /*                                   Code                                    */
54 /*****************************************************************************/
55
56
57
58 void WriteStrPool (void)
59 /* Write the string pool to the object file */
60 {
61     unsigned I;
62
63     /* Get the number of strings in the string pool */
64     unsigned Count = SP_GetCount (StrPool);
65
66     /* Tell the object file module that we're about to start the string pool */
67     ObjStartStrPool ();
68
69     /* Write the string count to the list */
70     ObjWriteVar (Count);
71
72     /* Write the strings in id order */
73     for (I = 0; I < Count; ++I) {
74         ObjWriteBuf (SP_Get (StrPool, I));
75     }
76
77     /* Done writing the string pool */
78     ObjEndStrPool ();
79 }
80
81
82
83 void InitStrPool (void)
84 /* Initialize the string pool */
85 {
86     /* Create a string pool */
87     StrPool = NewStringPool (1103);
88
89     /* Insert an empty string. It will have string id 0 */
90     SP_AddStr (StrPool, "");
91 }