Lines Matching full:print
130 print <<"END";
156 print "Merged hash:\n";
160 print "$key:$subkey:", $hh->{$subkey}, "\n";
207 print <<"END";
230 print "/* Unicode version $version */\n";
234 print "const uint8_t VERSION_$i = $v[$i];\n";
236 print "\n";
258 print "const int32_t STRING_COUNT = ", scalar @strings, ";\n\n";
262 print "/* to be sorted */\n";
263 print "const $STRING_CLASS STRING_TABLE[] = {\n";
265 print " $STRING_CLASS(\"$strings[$i]\", $i),\n";
268 print "};\n\n";
276 print "/* to be filled in */\n";
277 print "int32_t REMAP[", scalar @strings, "];\n\n";
324 print "const int32_t NAME_GROUP_COUNT = ",
327 print "int32_t NAME_GROUP[] = {\n";
340 print " ",
348 print "};\n\n";
352 print "#define MAX_NAMES_PER_GROUP $max_names\n\n";
361 print "const int32_t VALUES_${prop}_COUNT = ",
364 print "const $ALIAS_CLASS VALUES_${prop}\[] = {\n";
369 print " $ALIAS_CLASS((int32_t) $enum, ", $vh->{$enum}, "),\n";
375 print "};\n\n";
387 print "const int32_t ${topName}PROPERTY_COUNT = $count;\n\n";
389 print "const $PROPERTY_CLASS ${topName}PROPERTY[] = {\n";
405 print " $PROPERTY_CLASS((int32_t) $enum, ",
409 print "};\n\n";
412 print "/*eof*/\n";
453 print "Property values hash:\n";
457 print "$key:$subkey:", $hh->{$subkey}, "\n";
464 print "Script hash:\n";
466 print "$key:", $s->{$key}, "\n";
531 print "Warning: Property $prop from PropertyValueAliases not listed in PropertyAliases\n";
627 print join("\n", sort @err), "\n" if (@err);
759 print $err if ($err);
1061 #print "Parsing $mode\n";
1134 #print "Warning: Ignoring $1\n";
1153 #print "Warning: Ignoring $1\n";
1169 #print "Warning: Ignoring $1\n";
1263 # print "Unicode version: ", $version, "\n";
1277 #print "Parsing $mode\n";
1283 #print "Parsing $mode\n";
