[pypy-svn] r48070 - pypy/dist/pypy/lang/smalltalk

[lukas at codespeak.net]

Author: lukas
Date: Fri Oct 26 16:43:24 2007
New Revision: 48070

Added:
   pypy/dist/pypy/lang/smalltalk/find_untested_bytecodes.sh   (contents, props changed)
Modified:
   pypy/dist/pypy/lang/smalltalk/find_untested_prims.sh
Log:
added a script to find untested bytecodes


Added: pypy/dist/pypy/lang/smalltalk/find_untested_bytecodes.sh
==============================================================================
--- (empty file)
+++ pypy/dist/pypy/lang/smalltalk/find_untested_bytecodes.sh	Fri Oct 26 16:43:24 2007
@@ -0,0 +1,17 @@
+#!/bin/sh
+
+awk '/W_ContextPart\./ {print $0;}' interpreter.py \
+    | sed -e 's/.*W_ContextPart\.\(.*\)),/\1/' \
+    | sort -u \
+        > bcodes.1
+cat test/test_interpreter.py \
+    | sed 's/[^A-Za-z]/ /g' \
+    | tr ' ' '\n' \
+    | grep '[a-z]' \
+    | sort -u \
+        > bcodes.2
+
+echo Untested byte-codes:
+diff bcodes.1 bcodes.2 \
+    | grep "<"
+rm bcodes.1 bcodes.2
\ No newline at end of file

Modified: pypy/dist/pypy/lang/smalltalk/find_untested_prims.sh
==============================================================================
--- pypy/dist/pypy/lang/smalltalk/find_untested_prims.sh	(original)
+++ pypy/dist/pypy/lang/smalltalk/find_untested_prims.sh	Fri Oct 26 16:43:24 2007
@@ -1,5 +1,5 @@
 #!/bin/sh
 grep '^[A-Z][A-Z_]' primitives.py | awk '{print $1;}' | sort | uniq > pcodes.1
 grep 'primitives.[A-Z][A-Z_]' test/test_primitives.py | sed 's/.*primitives.\([A-Z_]*\).*/\1/g' | sort | uniq > pcodes.2
-echo Unimplemented primitive codes:
+echo Untested primitive codes:
 diff pcodes.1 pcodes.2