Changeset 41 for trunk/mkopcode.awk

Timestamp:

05/28/2006 04:36:57 AM (3 years ago)

Author:

moo

Message:

avoid gnu extension, for devel

Files:

• trunk/mkopcode.awk (modified) (2 diffs)

trunk/mkopcode.awk

@@ -5 +5 @@
     FS=" "
     max = 0;
-    delete opcodes;
 }
 
@@ -11 +10 @@
     # regex from php5.1+/Zend/zend_vm_gen.php
     gsub(/ +/, "");
-    if (!match($0, /^ZEND_VM_HANDLER\(([0-9]+),([A-Z_]+),([A-Z|]+),([A-Z|]+)\)/, array)) {
+    if (!match($0, /^ZEND_VM_HANDLER\(([0-9]+),([A-Z_]+),([A-Z|]+),([A-Z|]+)\)/)) {
         print "error unmatch $0";
         exit;
     }
-    id = 0 + array[1];
-    name = array[2];
+    # life is hard without 3rd argument of match()
+    sub(/^ZEND_VM_HANDLER\(/, "");
+    id = $0;
+    sub(/,.*/, "", id); # chop
+    id = 0 + id;
+    sub(/^([0-9]+),/, "");
+    sub(/,.*/, ""); # chop
+    name = $0;
     if (max < id) {
         max = id;