(retracted by #12485)

Avoid dollar signs in identifiers (in non-VMS) to
placate ultra picky ANSI compilers (such as DEC^WCPQ^WHP).

p4raw-id: //depot/perl@12475

1 files changed, 1 insertions, 1 deletions

diff --git a/toke.c b/toke.c
index af117bcf92..ce049c9c58 100644
--- a/toke.c
+++ b/toke.c
@@ -1935,7 +1935,7 @@ S_incl_perldb(pTHX)
 
 	if (pdb)
 	    return pdb;
-	SETERRNO(0,SS$_NORMAL);
+	SETERRNO(0,VMS_SS_NORMAL);
 	return "BEGIN { require 'perl5db.pl' }";
     }
     return "";