annotate replace_agda.rb @ 41:8fc2ac1f901f

Add delta definition in agda
author Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
date Fri, 13 Feb 2015 11:48:40 +0900
parents 8a70394e45b4
children 4cc65012412f
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
36
2ff5acb0d2e9 Add escape script
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
1 #!/usr/bin/env ruby
2ff5acb0d2e9 Add escape script
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
2
2ff5acb0d2e9 Add escape script
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
3 replace_table = {
41
8fc2ac1f901f Add delta definition in agda
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents: 39
diff changeset
4 '∙' => 'circ',
8fc2ac1f901f Add delta definition in agda
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents: 39
diff changeset
5 '×' => 'times',
8fc2ac1f901f Add delta definition in agda
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents: 39
diff changeset
6 '⟨' => 'langle',
8fc2ac1f901f Add delta definition in agda
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents: 39
diff changeset
7 '⟩' => 'rangle',
8fc2ac1f901f Add delta definition in agda
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents: 39
diff changeset
8 '∎' => 'blacksquare'
36
2ff5acb0d2e9 Add escape script
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
9 }
2ff5acb0d2e9 Add escape script
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
10 footer = '.replaced'
2ff5acb0d2e9 Add escape script
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
11
2ff5acb0d2e9 Add escape script
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
12 sources = Dir.glob('src/*.agda')
2ff5acb0d2e9 Add escape script
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
13
2ff5acb0d2e9 Add escape script
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
14 sources.each do |src|
2ff5acb0d2e9 Add escape script
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
15 code = File.read(src)
2ff5acb0d2e9 Add escape script
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
16
2ff5acb0d2e9 Add escape script
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
17 replace_table.each do |k, v|
2ff5acb0d2e9 Add escape script
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
18 code = code.gsub(k, "@$\\#{v}$@" )
2ff5acb0d2e9 Add escape script
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
19 end
2ff5acb0d2e9 Add escape script
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
20
2ff5acb0d2e9 Add escape script
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
21 File.write(src+footer , code)
2ff5acb0d2e9 Add escape script
Yasutaka Higa <e115763@ie.u-ryukyu.ac.jp>
parents:
diff changeset
22 end