firebird/firebird-mirror
firebird/firebird-mirror
8
0
Fork 1
mirror of https://github.com/FirebirdSQL/firebird.git synced 2025-01-24 08:03:03 +01:00
Code Issues

Fixed error in TCS's DSQL_DOMAIN_01 and PROC_LEVEL0_TESTS_2 - long domain name was silently truncated instead of throwing an error

Browse Source
This commit is contained in:
alexpeshkoff 2008-02-05 11:48:59 +00:00
parent ea1f08da02
commit da233e16bf
2 changed files with 12 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
src/dsql/ddl.cpp
View File

@ -274,6 +274,15 @@ inline void dsql_req::append_string(UCHAR verb, const Firebird::MetaName& name)
}
//
// Write out a string valued attribute. (Overload 3.)
//
inline void dsql_req::append_string(UCHAR verb, const Firebird::string& name)
{
append_string(verb, name.c_str(), name.length());
}
inline void dsql_req::append_uchar(UCHAR byte)
{
req_blr_data.add(byte);

5
src/dsql/dsql.h
View File

@ -255,12 +255,12 @@ public:
SSHORT fld_character_set_id; //!< ID of field's character set
SSHORT fld_collation_id; //!< ID of field's collation
SSHORT fld_ttype; //!< ID of field's language_driver
Firebird::MetaName fld_type_of_name; //!< TYPE OF
Firebird::string fld_type_of_name; //!< TYPE OF
dsql_str* fld_type_of_table; //!< TYPE OF table name
bool fld_explicit_collation; //!< COLLATE was explicit specified
bool fld_not_nullable; //!< NOT NULL was explicit specified
bool fld_full_domain; //!< Domain name without TYPE OF prefix
Firebird::MetaName fld_name;
Firebird::string fld_name;
Firebird::MetaName fld_source;
};
@ -421,6 +421,7 @@ public:
void append_meta_string(const char* string);
void append_string(UCHAR verb, const char* string, USHORT len);
void append_string(UCHAR verb, const Firebird::MetaName& name);
void append_string(UCHAR verb, const Firebird::string& name);
void append_number(UCHAR verb, SSHORT number);
void begin_blr(UCHAR verb);
void end_blr();