"Fossies" - the Fresh Open Source Software Archive  

Source code changes of the file "extern/cloop/src/cloop/Generator.cpp" between
Firebird-3.0.2.32703-0.tar.bz2 and Firebird-3.0.4.33054-0.tar.bz2

About: Firebird is a relational database offering many ANSI SQL standard features.

Generator.cpp  (Firebird-3.0.2.32703-0.tar.bz2)	:	Generator.cpp  (Firebird-3.0.4.33054-0.tar.bz2)
skipping to change at line 871		skipping to change at line 871
implementationFile(implementationFile),		implementationFile(implementationFile),
exceptionClass(exceptionClass),		exceptionClass(exceptionClass),
functionsFile(functionsFile)		functionsFile(functionsFile)
{		{
}		}
void PascalGenerator::generate()		void PascalGenerator::generate()
{		{
fprintf(out, "{ %s }\n\n", AUTOGEN_MSG);		fprintf(out, "{ %s }\n\n", AUTOGEN_MSG);
		fprintf(out, "{$IFDEF FPC}\n{$MODE DELPHI}\n{$OBJECTCHECKS OFF}\n{$ENDIF}
		\n\n");
fprintf(out, "unit %s;\n\n", unitName.c_str());		fprintf(out, "unit %s;\n\n", unitName.c_str());
fprintf(out, "interface\n\n");		fprintf(out, "interface\n\n");
fprintf(out, "uses Classes");		fprintf(out, "uses Classes");
if (!additionalUses.empty())		if (!additionalUses.empty())
fprintf(out, ", %s", additionalUses.c_str());		fprintf(out, ", %s", additionalUses.c_str());
fprintf(out, ";\n\n");		fprintf(out, ";\n\n");
fprintf(out, "type\n");		fprintf(out, "type\n");
End of changes. 1 change blocks.
0 lines changed or deleted		3 lines changed or added

---