| OLD | NEW |
| 1 #!/usr/bin/perl | 1 #!/usr/bin/perl |
| 2 # ******************************************************************** | 2 # ******************************************************************** |
| 3 # * COPYRIGHT: | 3 # * COPYRIGHT: |
| 4 # * Copyright (c) 2002-2007, International Business Machines Corporation and | 4 # * Copyright (c) 2002-2015, International Business Machines Corporation and |
| 5 # * others. All Rights Reserved. | 5 # * others. All Rights Reserved. |
| 6 # ******************************************************************** | 6 # ******************************************************************** |
| 7 # | 7 # |
| 8 # regexcst.pl | 8 # regexcst.pl |
| 9 # Compile the regular expression paser state table data into initiali
zed C data. | 9 # Compile the regular expression paser state table data into initiali
zed C data. |
| 10 # Usage: | 10 # Usage: |
| 11 # cd icu/source/i18n | 11 # cd icu/source/i18n |
| 12 # perl regexcst.pl < regexcst.txt > regexcst.h | 12 # perl regexcst.pl < regexcst.txt > regexcst.h |
| 13 # | 13 # |
| 14 # The output file, regexcst.h, is included by some of the .cpp regex | 14 # The output file, regexcst.h, is included by some of the .cpp regex |
| (...skipping 184 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 199 | 199 |
| 200 die if ($errors>0); | 200 die if ($errors>0); |
| 201 | 201 |
| 202 print "//-----------------------------------------------------------------------
----------\n"; | 202 print "//-----------------------------------------------------------------------
----------\n"; |
| 203 print "//\n"; | 203 print "//\n"; |
| 204 print "// Generated Header File. Do not edit by hand.\n"; | 204 print "// Generated Header File. Do not edit by hand.\n"; |
| 205 print "// This file contains the state table for the ICU Regular Expression P
attern Parser\n"; | 205 print "// This file contains the state table for the ICU Regular Expression P
attern Parser\n"; |
| 206 print "// It is generated by the Perl script \"regexcst.pl\" from\n"; | 206 print "// It is generated by the Perl script \"regexcst.pl\" from\n"; |
| 207 print "// the rule parser state definitions file \"regexcst.txt\".\n"; | 207 print "// the rule parser state definitions file \"regexcst.txt\".\n"; |
| 208 print "//\n"; | 208 print "//\n"; |
| 209 print "// Copyright (C) 2002-2007 International Business Machines Corporation
\n"; | 209 print "// Copyright (C) 2002-2015 International Business Machines Corporation
\n"; |
| 210 print "// and others. All rights reserved. \n"; | 210 print "// and others. All rights reserved. \n"; |
| 211 print "//\n"; | 211 print "//\n"; |
| 212 print "//-----------------------------------------------------------------------
----------\n"; | 212 print "//-----------------------------------------------------------------------
----------\n"; |
| 213 print "#ifndef RBBIRPT_H\n"; | 213 print "#ifndef RBBIRPT_H\n"; |
| 214 print "#define RBBIRPT_H\n"; | 214 print "#define RBBIRPT_H\n"; |
| 215 print "\n"; | 215 print "\n"; |
| 216 print "U_NAMESPACE_BEGIN\n"; | 216 print "U_NAMESPACE_BEGIN\n"; |
| 217 | 217 |
| 218 # | 218 # |
| 219 # Emit the constants for indicies of Unicode Sets | 219 # Emit the constants for indicies of Unicode Sets |
| (...skipping 99 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
| 319 print " 0,\n"; | 319 print " 0,\n"; |
| 320 } | 320 } |
| 321 } | 321 } |
| 322 print " 0};\n\n"; | 322 print " 0};\n\n"; |
| 323 | 323 |
| 324 print "U_NAMESPACE_END\n"; | 324 print "U_NAMESPACE_END\n"; |
| 325 print "#endif\n"; | 325 print "#endif\n"; |
| 326 | 326 |
| 327 | 327 |
| 328 | 328 |
| OLD | NEW |