|
@@ -1706,7 +1706,7 @@ implementation
|
|
const
|
|
const
|
|
basetype2vardef : array[tordtype] of longint = (
|
|
basetype2vardef : array[tordtype] of longint = (
|
|
varUndefined,
|
|
varUndefined,
|
|
- varbyte,varqword,varlongword,varqword,
|
|
|
|
|
|
+ varbyte,varword,varlongword,varqword,
|
|
varshortint,varsmallint,varinteger,varint64,
|
|
varshortint,varsmallint,varinteger,varint64,
|
|
varboolean,varboolean,varboolean,varUndefined,varUndefined,
|
|
varboolean,varboolean,varboolean,varUndefined,varUndefined,
|
|
varUndefined,varUndefined,varCurrency);
|
|
varUndefined,varUndefined,varCurrency);
|