From 6882a04fb36642862b11efe514251d32070c3d65 Mon Sep 17 00:00:00 2001
From: Konstantin Tokarev <annulen@yandex.ru>
Date: Thu, 25 Aug 2016 19:20:41 +0300
Subject: Imported QtWebKit TP3 (git b57bc6801f1876c3220d5a4bfea33d620d477443)

Change-Id: I3b1d8a2808782c9f34d50240000e20cb38d3680f
Reviewed-by: Konstantin Tokarev <annulen@yandex.ru>
---
 Source/JavaScriptCore/docs/make-bytecode-docs.pl | 43 ------------------------
 1 file changed, 43 deletions(-)
 delete mode 100755 Source/JavaScriptCore/docs/make-bytecode-docs.pl

(limited to 'Source/JavaScriptCore/docs/make-bytecode-docs.pl')

diff --git a/Source/JavaScriptCore/docs/make-bytecode-docs.pl b/Source/JavaScriptCore/docs/make-bytecode-docs.pl
deleted file mode 100755
index 5a95195a8..000000000
--- a/Source/JavaScriptCore/docs/make-bytecode-docs.pl
+++ /dev/null
@@ -1,43 +0,0 @@
-#!/usr/bin/perl -w
-
-use strict;
-
-open MACHINE, "<" . $ARGV[0];
-open OUTPUT, ">" . $ARGV[1];
-
-my @undocumented = ();
-
-print OUTPUT "<!-- Generated from Interpreter.cpp by make-bytecode-docs.pl. -->\n";
-print OUTPUT "<style>p code \{ font-size: 14px; \}</style>\n";
-
-while (<MACHINE>) {
-    if (/^ *DEFINE_OPCODE/) {
-        chomp;
-        s/^ *DEFINE_OPCODE\(op_//;
-        s/\).*$//;
-        my $opcode = $_;
-        $_ = <MACHINE>;
-        chomp;
-        if (m|/\* |) {
-            my $format = $_;
-            $format =~ s|.* /\* ||;
-            my $doc = "";
-            while (<MACHINE>) {
-                if (m|\*/|) {
-                    last;
-                }
-                $doc .= $_ . " ";
-            }
-
-            print OUTPUT "<h2><code>${opcode}</code></h2>\n<p><b>Format: </b><code>\n${format}\n</code></p>\n<p>\n${doc}\n</p>\n";
-        } else {
-            push @undocumented, $opcode;
-        }
-    }
-}
-
-close OUTPUT;
-
-for my $undoc (@undocumented) {
-    print "UNDOCUMENTED: ${undoc}\n";
-}
-- 
cgit v1.2.1