-
Notifications
You must be signed in to change notification settings - Fork 0
/
CGOperandSynonym.cpp
114 lines (90 loc) · 3.35 KB
/
CGOperandSynonym.cpp
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
/****************************************************************************
* Modul: $RCSfile: CGOperandSynonym.cpp,v $
*
* $Author: md $
* $Date: 1998/01/14 10:59:58 $
* $Revision: 1.2 $
*
* Aufgabe: Dieses Modul enthaelt Hilfsfunktionen
* Funktionen:
****************************************************************************/
#ifdef USE_PRAGMA
#pragma interface
#endif
/****************************************************************************
* Konstanten
****************************************************************************/
/****************************************************************************
* Include-Anweisungen
****************************************************************************/
#include <DS/DSSynonym.h>
#include "CGFile.h"
#include "CGOperandSynonym.h"
#ifdef DEBUG
#include <dmalloc.h>
#endif
/****************************************************************************
* Externe Variablen
****************************************************************************/
/****************************************************************************
* Globale Variablen
****************************************************************************/
/****************************************************************************
* Konstruktoren
****************************************************************************/
CGOperandSynonym::CGOperandSynonym(DSObject *father,
DSSynonymRef syn_ref) :
DSOperandSynonym(father, syn_ref)
{
}
/****************************************************************************
* Destruktor
****************************************************************************/
CGOperandSynonym::~CGOperandSynonym(void)
{
}
DSObject *CGOperandSynonym::New(DSObject *father) const
{
return new CGOperandSynonym(father);
}
/****************************************************************************
* Write(): Oberfunktion der Codegenerierung fuer OperandSynonym
* -> writer
* -> what
* Ergebnis: DS_OK oder DS_ERROR
* Seiteneffekte: Anlegen und Fuellen der .h und .cc-Files
****************************************************************************/
DSResult CGOperandSynonym::Write(DSWriter *writer, DSCardinal what) const
{
DSResult result;
(void)what;
result = WriteImplementation((CGWriter *)writer);
if (result != DS_OK) return result;
return DS_OK;
}
/****************************************************************************
* WriteImplementation(): schreibt einen als Synonym gespeicherten Operanden
* -> writer
* -> what
* Ergebnis: DS_OK,falls Aktion erfolgreich war, sonst DS_ERROR
* Seiteneffekte: Zieldatei wird gefuellt
****************************************************************************/
DSResult CGOperandSynonym::WriteImplementation(CGWriter *writer) const
{
DSSynonymRef synonym;
DSResult result;
CGFile *out;
CGPos pos;
out = writer->CGGetFilePointer();
assert(out);
pos = writer->CGGetIndentPos();
synonym = GetSynonymRef();
if (GetThisAtom()) // used in atom ?
{
synonym->GetParent()->Write(writer, CG_WRITE_IDENTIFIER);
InsertString(*out, "::", 0, CG_NO_EOL);
}
InsertString(*out, PREFIX_SYNONYM, pos, CG_NO_EOL);
InsertString(*out, synonym->GetName(), 0, CG_NO_EOL);
return DS_OK;
}