瀏覽代碼

* 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