diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2014-11-24 21:46:21 -0800 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2014-11-24 21:46:21 -0800 |
commit | 80a63c05e93af6a9d520ce655d5e3fa8c6b3baa8 (patch) | |
tree | 992291631132393b23b4b2b7e59f72e603fc63f9 | |
parent | 55b99d0cb9db75f8b81f033b359402245b3b7d3c (diff) | |
download | mu-80a63c05e93af6a9d520ce655d5e3fa8c6b3baa8.tar.gz |
316
-rw-r--r-- | mu.arc.t | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/mu.arc.t b/mu.arc.t index 9b13c0d7..069677c2 100644 --- a/mu.arc.t +++ b/mu.arc.t @@ -2571,7 +2571,7 @@ (prn "F - convert-quotes can handle labels")) (reset) -;? (new-trace "insert-code-before") +;? (new-trace "before") (add-code '((before label1 [ ((2 integer) <- copy (0 literal)) ]))) @@ -2592,7 +2592,7 @@ (prn "F - 'insert-code' can insert fragments before labels")) (reset) -;? (new-trace "insert-code-before-multiple") +;? (new-trace "before-multiple") (add-code '((before label1 [ ((2 integer) <- copy (0 literal)) ]) @@ -2619,7 +2619,7 @@ (prn "F - 'insert-code' can insert multiple fragments in order before label")) (reset) -;? (new-trace "insert-code-after") +;? (new-trace "after") (add-code '((after label1 [ ((2 integer) <- copy (0 literal)) ]))) @@ -2640,7 +2640,7 @@ (prn "F - 'insert-code' can insert fragments after labels")) (reset) -;? (new-trace "insert-code-after-multiple") +;? (new-trace "after-multiple") (add-code '((after label1 [ ((2 integer) <- copy (0 literal)) ]) @@ -2667,7 +2667,7 @@ (prn "F - 'insert-code' can insert multiple fragments in order after label")) (reset) -;? (new-trace "insert-code-before-after") +;? (new-trace "before-after") (add-code '((before label1 [ ((2 integer) <- copy (0 literal)) ]) @@ -2696,7 +2696,7 @@ (prn "F - 'insert-code' can insert multiple fragments around label")) (reset) -;? (new-trace "insert-code-before-after-multiple") +;? (new-trace "before-after-multiple") (add-code '((before label1 [ ((2 integer) <- copy (0 literal)) ((3 integer) <- copy (0 literal)) @@ -2742,7 +2742,7 @@ ((8 integer) <- copy (0 literal)))) (prn "F - 'insert-code' can insert multiple fragments around label - 2")) -;? (new-trace "insert-code-before-after-independent") +;? (new-trace "before-after-independent") (if (~iso (do (reset) (add-code '((before label1 [ |