em_table is now in /h; new_table is now in util/data.
This commit is contained in:
parent
d85e045ae6
commit
415e7e14fc
175
etc/em_table
175
etc/em_table
|
@ -1,175 +0,0 @@
|
|||
magic 173
|
||||
fmnem 1
|
||||
nmnem 149
|
||||
fpseu 150
|
||||
npseu 30
|
||||
filb0 180
|
||||
nilb0 60
|
||||
fcst0 0
|
||||
zcst0 120
|
||||
ncst0 240
|
||||
fspec 240
|
||||
nspec 16
|
||||
ilb1 240
|
||||
ilb2 241
|
||||
dlb1 242
|
||||
dlb2 243
|
||||
dnam 244
|
||||
cst2 245
|
||||
cst4 246
|
||||
cst8 247
|
||||
doff 248
|
||||
pnam 249
|
||||
scon 250
|
||||
icon 251
|
||||
ucon 252
|
||||
fcon 253
|
||||
cend 255
|
||||
|
||||
bss 0 nvt
|
||||
con 1 a+
|
||||
end 2 n?
|
||||
exa 3 e
|
||||
exc 4 nn
|
||||
exp 5 p
|
||||
hol 6 nvt
|
||||
ina 7 e
|
||||
inp 8 p
|
||||
mes 9 na*
|
||||
pro 10 pn?
|
||||
rom 11 a+
|
||||
|
||||
aar w- -p-a-p+p
|
||||
adf w- -a-a+a
|
||||
adi w- -a-a+a
|
||||
adp f- -p+p
|
||||
ads w- -a-p+p
|
||||
adu w- -a-a+a
|
||||
and w- -a-a+a
|
||||
asp f- -a
|
||||
ass w- -a-x
|
||||
beq bc -w-w
|
||||
bge bc -w-w
|
||||
bgt bc -w-w
|
||||
ble bc -w-w
|
||||
blm z- -p-p
|
||||
bls w- -a-p-p
|
||||
blt bc -w-w
|
||||
bne bc -w-w
|
||||
bra bt 0
|
||||
cai -p -p
|
||||
cal pp 0
|
||||
cff -- -w-w-y+x
|
||||
cfi -- -w-w-y+x
|
||||
cfu -- -w-w-y+x
|
||||
cif -- -w-w-y+x
|
||||
cii -- -w-w-y+x
|
||||
ciu -- -w-w-y+x
|
||||
cmf w- -a-a+w
|
||||
cmi w- -a-a+w
|
||||
cmp -- -p-p+w
|
||||
cms w- -a-a+w
|
||||
cmu w- -a-a+w
|
||||
com w- -a-a+a
|
||||
csa wt -p-a
|
||||
csb wt -p-a
|
||||
cuf -- -w-w-y+x
|
||||
cui -- -w-w-y+x
|
||||
cuu -- -w-w-y+x
|
||||
dch -- -p+p
|
||||
dec -- -w+w
|
||||
dee g- 0
|
||||
del l- 0
|
||||
dup s- -a+a+a
|
||||
dus w- -a-x+x+x
|
||||
dvf w- -a-a+a
|
||||
dvi w- -a-a+a
|
||||
dvu w- -a-a+a
|
||||
exg w- -a-a+a+a
|
||||
fef w- -a+a+w
|
||||
fif w- -a-a+a+a
|
||||
fil g- 0
|
||||
gto gt -p-?
|
||||
inc -- -w+w
|
||||
ine g- 0
|
||||
inl l- 0
|
||||
inn w- -w-a+w
|
||||
ior w- -a-a+a
|
||||
lae g- +p
|
||||
lal l- +p
|
||||
lar w- -p-a-p+?
|
||||
ldc d- +d
|
||||
lde g- +d
|
||||
ldf f- -p+d
|
||||
ldl l- +d
|
||||
lfr s- +a
|
||||
lil l- +w
|
||||
lim -- +w
|
||||
lin n- 0
|
||||
lni -- 0
|
||||
loc c- +w
|
||||
loe g- +w
|
||||
lof f- -p+w
|
||||
loi o- -p+a
|
||||
lol l- +w
|
||||
lor r- +p
|
||||
los w- -a-p+x
|
||||
lpb -- -p+p
|
||||
lpi p- +p
|
||||
lxa n- +p
|
||||
lxl n- +p
|
||||
mlf w- -a-a+a
|
||||
mli w- -a-a+a
|
||||
mlu w- -a-a+a
|
||||
mon -- -?+?
|
||||
ngf w- -a+a
|
||||
ngi w- -a+a
|
||||
nop -- 0
|
||||
rck w- -p-a+a
|
||||
ret zt -a-?
|
||||
rmi w- -a-a+a
|
||||
rmu w- -a-a+a
|
||||
rol w- -w-a+a
|
||||
ror w- -w-a+a
|
||||
rtt -t -?
|
||||
sar w- -p-a-p-?
|
||||
sbf w- -a-a+a
|
||||
sbi w- -a-a+a
|
||||
sbs w- -p-p+a
|
||||
sbu w- -a-a+a
|
||||
sde g- -d
|
||||
sdf f- -p-d
|
||||
sdl l- -d
|
||||
set w- -w+a
|
||||
sig -- -p-p+p+p
|
||||
sil l- -w
|
||||
sim -- -w
|
||||
sli w- -w-a+a
|
||||
slu w- -w-a+a
|
||||
sri w- -w-a+a
|
||||
sru w- -w-a+a
|
||||
ste g- -w
|
||||
stf f- -p-w
|
||||
sti o- -p-a
|
||||
stl l- -w
|
||||
str r- -p
|
||||
sts w- -a-p-x
|
||||
teq -- -w+w
|
||||
tge -- -w+w
|
||||
tgt -- -w+w
|
||||
tle -- -w+w
|
||||
tlt -- -w+w
|
||||
tne -- -w+w
|
||||
trp -p -w+?
|
||||
xor w- -a-a+a
|
||||
zeq bc -w
|
||||
zer w- +a
|
||||
zge bc -w
|
||||
zgt bc -w
|
||||
zle bc -w
|
||||
zlt bc -w
|
||||
zne bc -w
|
||||
zre g- 0
|
||||
zrf w- +a
|
||||
zrl l- 0
|
||||
|
|
@ -1,74 +0,0 @@
|
|||
#!/bin/sh
|
||||
|
||||
h=${1-.}
|
||||
d=${2-.}
|
||||
|
||||
set `grep fpseu em_table`
|
||||
p=$2
|
||||
set `grep fmnem em_table`
|
||||
m=$2
|
||||
|
||||
ed - em_table <<'A' > X
|
||||
1,/^$/g/ /s// /gp
|
||||
A
|
||||
|
||||
ed - em_table <<'A' | awk '{$2=$2+'$p'; print}' > Y
|
||||
1,/^$/d
|
||||
1,/^$/g/ /s// /gp
|
||||
A
|
||||
|
||||
ed - em_table <<'A' | awk '{print $0,'$m'+i++}' > Z
|
||||
1,/^$/d
|
||||
1,/^$/d
|
||||
1,/^$/g/ /s// /gp
|
||||
A
|
||||
|
||||
i=`wc -l <Y`
|
||||
echo 'lpseu' `expr $i + $p - 1` >>X
|
||||
i=`wc -l <Z`
|
||||
echo 'lmnem' `expr $i + $m - 1` >>X
|
||||
|
||||
ed - X <<'A' > $h/em_spec.h
|
||||
g/^/s//#define sp_/p
|
||||
A
|
||||
|
||||
ed - Y <<'A' > $h/em_pseu.h
|
||||
g/ \(.*\) .*/s// \1/
|
||||
g/\(.*\) \(.*\)/s//#define ps_\1 \2/p
|
||||
A
|
||||
|
||||
ed - Z <<'A' > $h/em_mnem.h
|
||||
g/ .* /s// /
|
||||
g/\(.*\) \(.*\)/s//#define op_\1 \2/p
|
||||
A
|
||||
|
||||
(
|
||||
echo 'char em_pseu[][4] = {'
|
||||
ed - Y <<'A'
|
||||
g/\(...\).*/s// "\1",/p
|
||||
A
|
||||
echo '};'
|
||||
) > $d/em_pseu.c
|
||||
|
||||
(
|
||||
echo 'char em_mnem[][4] = {'
|
||||
ed - Z <<'A'
|
||||
g/\(...\).*/s// "\1",/p
|
||||
A
|
||||
echo '};'
|
||||
) > $d/em_mnem.c
|
||||
|
||||
(
|
||||
echo '#include <em_flag.h>
|
||||
char em_flag[] = {'
|
||||
ed - Z <<'A' | tr abcdefghijklmnopqrstuvwxyz ABCDEFGHIJKLMNOPQRSTUVWXYZ
|
||||
g/^... /s///
|
||||
g/ .*/s///
|
||||
g/\(.\)\(.\)/s//PAR_\1 | FLO_\2/
|
||||
g/-/s//NO/g
|
||||
g/.*/s// &,/p
|
||||
A
|
||||
echo '};'
|
||||
) > $d/em_flag.c
|
||||
|
||||
rm X Y Z
|
Loading…
Reference in a new issue