فهرست منبع

* made behaviour of -CT parameters consistent with other parameters: instead
of -CTnoTargetSwitch, now you can (and have to) use -CTTargetSwitch- to
disable it

git-svn-id: trunk@23576 -

Jonas Maebe 12 سال پیش
والد
کامیت
227bb7d850
1فایلهای تغییر یافته به همراه3 افزوده شده و 3 حذف شده
  1. 3 3
      compiler/globals.pas

+ 3 - 3
compiler/globals.pas

@@ -1358,10 +1358,10 @@ implementation
           tok:=GetToken(s,',');
           if tok='' then
            break;
-          setstr:=upper(copy(tok,1,2));
-          if setstr='NO' then
+          setstr:=upper(copy(tok,length(tok),1));
+          if setstr='-' then
             begin
-              delete(tok,1,2);
+              setlength(tok,length(tok)-1);
               doset:=false;
             end
           else