fix mulx argument order using sed, test feadd, femul (fails due to #234)

1 files changed, 4 insertions, 3 deletions

diff --git a/extract-function.sh b/extract-function.sh
index c4345674f..c00ae274b 100755
--- a/extract-function.sh
+++ b/extract-function.sh
@@ -62,10 +62,11 @@ while IFS= read -r line; do
       case "$show" in
         true)
           lines=$((lines+1))
-          echo "{ $line" | \
-            sed s':^\([^,]*\) \([^, ]*\)\(\s*\),\(.*\)\(mulx.*\))\([; ]*\)$:\1 \2\3;\4_\5, \&\2)\6:' | \
+          line="$(echo "$line" | \
+            sed s':^\([^,]*\),\(\s*\)\([^ ]*\) \([^ ]*\)\(.*\)\(mulx.*\))\([; ]*\)$: \3 \4;\2\1\5_\6, \&\4)\7:' | \
             sed s':^\([^,]*\) \([^, ]*\)\(\s*\),\(.*\)\(addcarryx.*\))\([; ]*\)$:\1 \2\3;\4_\5, \&\2)\6:' | \
-            sed s':^\([^,]*\) \([^, ]*\)\(\s*\),\(.*\)\(subborrow.*\))\([; ]*\)$:\1 \2\3;\4_\5, \&\2)\6:'
+            sed s':^\([^,]*\) \([^, ]*\)\(\s*\),\(.*\)\(subborrow.*\))\([; ]*\)$:\1 \2\3;\4_\5, \&\2)\6:')"
+          echo "{ $line"
           ;;
       esac
       ;;