chiark / gitweb /
parse-proto-spec works so far
authorian <ian>
Tue, 31 May 2005 22:55:55 +0000 (22:55 +0000)
committerian <ian>
Tue, 31 May 2005 22:55:55 +0000 (22:55 +0000)
hostside/parse-proto-spec

index 6aa2b74d577ad63077056eb6a9a9a7053d3647ef..a15db77ecd28f6333562bae042ee8ef46f9e9f93 100755 (executable)
@@ -46,8 +46,8 @@ while (<>) {
        $ybit= oct("0b$ybit");
     }
     for $yval ($ybit ? (0,1) : '') {
-       printf(" { %-16s 0x%02x, %2d },\n",
-              sprintf("\"%s%s\",",$cname, $yval),
+       printf("%s( %-16s, 0x%02x, %2d )\n",
+              sprintf("%s%s,",$cname, $yval),
               oct("0b$opcode") | $ybit *$yval,
               $arglen)
            or die $!;