FreeCalypso > hg > freecalypso-tools
annotate ringtools/fc-meltest-e1 @ 926:6a0aa8d36d06
rvinterf backslash escape: introduce libprint
The new helper function library named libprint is meant to replace
the badly misnamed libg23, and will soon contain functions for
printing all of the same kinds of GPF TST packets that are now handled
in libg23. However, we are also moving safe_print_trace() from libasync
to this new library, and changing it to emit our new backslash escape
format.
author | Mychaela Falconia <falcon@freecalypso.org> |
---|---|
date | Tue, 23 May 2023 03:47:46 +0000 |
parents | 2fe0f7fe1f86 |
children |
rev | line source |
---|---|
876
9998c015a687
ringtools/fc-meltest-pwt: shell script created, works as expected
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
1 #!/bin/sh |
9998c015a687
ringtools/fc-meltest-pwt: shell script created, works as expected
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
2 |
9998c015a687
ringtools/fc-meltest-pwt: shell script created, works as expected
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
3 if [ $# != 1 ] |
9998c015a687
ringtools/fc-meltest-pwt: shell script created, works as expected
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
4 then |
877
2fe0f7fe1f86
ringtools/fc-meltest-e1: parallel to fc-meltest-pwt
Mychaela Falconia <falcon@freecalypso.org>
parents:
876
diff
changeset
|
5 echo "usage: $0 e1_source_file" 1>&2 |
876
9998c015a687
ringtools/fc-meltest-pwt: shell script created, works as expected
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
6 exit 1 |
9998c015a687
ringtools/fc-meltest-pwt: shell script created, works as expected
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
7 fi |
9998c015a687
ringtools/fc-meltest-pwt: shell script created, works as expected
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
8 |
877
2fe0f7fe1f86
ringtools/fc-meltest-e1: parallel to fc-meltest-pwt
Mychaela Falconia <falcon@freecalypso.org>
parents:
876
diff
changeset
|
9 tmpfile=/tmp/fc-test-melody.e1 |
876
9998c015a687
ringtools/fc-meltest-pwt: shell script created, works as expected
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
10 |
9998c015a687
ringtools/fc-meltest-pwt: shell script created, works as expected
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
11 set -ex |
9998c015a687
ringtools/fc-meltest-pwt: shell script created, works as expected
Mychaela Falconia <falcon@freecalypso.org>
parents:
diff
changeset
|
12 |
877
2fe0f7fe1f86
ringtools/fc-meltest-e1: parallel to fc-meltest-pwt
Mychaela Falconia <falcon@freecalypso.org>
parents:
876
diff
changeset
|
13 fc-e1gen "$1" $tmpfile |
2fe0f7fe1f86
ringtools/fc-meltest-e1: parallel to fc-meltest-pwt
Mychaela Falconia <falcon@freecalypso.org>
parents:
876
diff
changeset
|
14 fc-fsio upload-file $tmpfile /mel/test.e1 |
2fe0f7fe1f86
ringtools/fc-meltest-e1: parallel to fc-meltest-pwt
Mychaela Falconia <falcon@freecalypso.org>
parents:
876
diff
changeset
|
15 fc-shell 'at@e1="/mel/test.e1"' |