compiler.cfg: don't need to escape the symbol here.

db4
John Benediktsson 2012-08-02 15:14:42 -07:00
parent 2dafe964fd
commit 6a183718fa
4 changed files with 19 additions and 19 deletions

View File

@ -103,7 +103,7 @@ V{
[ ] [ 1 get instructions>> allocation-size 123 <alien> size assert= ] unit-test
2 \ vreg-counter set-global
2 vreg-counter set-global
: gc-check? ( bb -- ? )
instructions>>
@ -119,11 +119,11 @@ V{
T{ ##branch }
} = ;
4 \ vreg-counter set-global
4 vreg-counter set-global
[ t ] [ <gc-call> gc-call? ] unit-test
30 \ vreg-counter set-global
30 vreg-counter set-global
V{
T{ ##prologue }
@ -290,7 +290,7 @@ V{
0 1 edge
1 2 edge
2 \ vreg-counter set-global
2 vreg-counter set-global
[ ] [ test-gc-checks ] unit-test
@ -326,7 +326,7 @@ V{
0 1 edge
1 2 edge
2 \ vreg-counter set-global
2 vreg-counter set-global
[ ] [ test-gc-checks ] unit-test

View File

@ -9,7 +9,7 @@ SYMBOL: vreg-counter
: next-vreg ( -- vreg )
! This word cannot be called AFTER representation selection has run;
! use next-vreg-rep in that case
\ vreg-counter counter ;
vreg-counter counter ;
SYMBOL: representations

View File

@ -28,7 +28,7 @@ IN: compiler.cfg.representations
H{ } clone representations set
3 \ vreg-counter set-global
3 vreg-counter set-global
[
{
@ -197,7 +197,7 @@ V{
3 { 3 4 } edges
2 4 edge
3 \ vreg-counter set-global
3 vreg-counter set-global
[ ] [ test-representations ] unit-test
@ -396,7 +396,7 @@ cpu x86.32? [
! Don't convert the def site into anything but tagged-rep since
! we might lose precision
5 \ vreg-counter set-global
5 vreg-counter set-global
[ f ] [
V{
@ -426,7 +426,7 @@ cpu x86.32? [
] unit-test
! Peephole optimization if input to ##shl-imm is tagged
3 \ vreg-counter set-global
3 vreg-counter set-global
[
V{
@ -445,7 +445,7 @@ cpu x86.32? [
} test-peephole
] unit-test
3 \ vreg-counter set-global
3 vreg-counter set-global
[
V{
@ -531,7 +531,7 @@ cpu x86.32? [
} test-peephole
] unit-test
6 \ vreg-counter set-global
6 vreg-counter set-global
! Peephole optimization if input to ##sar-imm is tagged
[
@ -549,7 +549,7 @@ cpu x86.32? [
} test-peephole
] unit-test
6 \ vreg-counter set-global
6 vreg-counter set-global
! (Lack of) peephole optimization if output of ##sar-imm needs to be tagged
[
@ -630,7 +630,7 @@ cpu x86.32? [
} test-peephole
] unit-test
6 \ vreg-counter set-global
6 vreg-counter set-global
[
V{
@ -686,7 +686,7 @@ cpu x86.32? [
! Make sure we don't exceed immediate bounds
cpu x86.64? [
4 \ vreg-counter set-global
4 vreg-counter set-global
[
V{
@ -735,7 +735,7 @@ cpu x86.64? [
} test-peephole
] unit-test
4 \ vreg-counter set-global
4 vreg-counter set-global
[
V{
@ -860,7 +860,7 @@ cpu x86.64? [
} test-peephole
] unit-test
4 \ vreg-counter set-global
4 vreg-counter set-global
[
V{
@ -883,7 +883,7 @@ cpu x86.64? [
] unit-test
! Tag/untag elimination for ##not
2 \ vreg-counter set-global
2 vreg-counter set-global
[
V{

View File

@ -1613,7 +1613,7 @@ cpu x86? [
] unit-test
! Distributive law
2 \ vreg-counter set-global
2 vreg-counter set-global
[
{