summaryrefslogtreecommitdiffstats
path: root/kjs/create_hash_table
diff options
context:
space:
mode:
Diffstat (limited to 'kjs/create_hash_table')
-rwxr-xr-xkjs/create_hash_table4
1 files changed, 3 insertions, 1 deletions
diff --git a/kjs/create_hash_table b/kjs/create_hash_table
index a7df5eddf..e8103fb99 100755
--- a/kjs/create_hash_table
+++ b/kjs/create_hash_table
@@ -69,7 +69,9 @@ while (<IN>) {
my $att = $3;
my $param = $4;
push(@keys, $key);
- push(@values, $val);
+ # values in HashEntry are short but can be unsigned in C++ code
+ # therefore it is necessary to force the cast in the generated files
+ push(@values, "(short)".$val);
printf STDERR "WARNING: Number of arguments missing for $key/$val\n"
if ( $att =~ m/Function/ && length($param) == 0);
push(@attrs, length($att) > 0 ? $att : "0");