Selaa lähdekoodia

* write " as octal number as well in assembler output, it is more compatible

florian 7 kuukautta sitten
vanhempi
commit
06f8ad2e3d
1 muutettua tiedostoa jossa 6 lisäystä ja 5 poistoa
  1. 6 5
      compiler/aggas.pas

+ 6 - 5
compiler/aggas.pas

@@ -1303,11 +1303,12 @@ implementation
                        end;
                       ch:=tai_string(hp).str[i-1];
                       case ch of
-                                #0, {This can't be done by range, because a bug in FPC}
-                           #1..#31,
-                        #128..#255 : s:='\'+tostr(ord(ch) shr 6)+tostr((ord(ch) and 63) shr 3)+tostr(ord(ch) and 7);
-                               '"' : s:='\"';
-                               '\' : s:='\\';
+                        #0, {This can't be done by range, because a bug in FPC}
+                        #1..#31,
+                        '"',#128..#255:
+                          s:='\'+tostr(ord(ch) shr 6)+tostr((ord(ch) and 63) shr 3)+tostr(ord(ch) and 7);
+                        '\':
+                          s:='\\';
                       else
                         s:=ch;
                       end;