Merged revisions 7546 via svnmerge from

http://svn.freepascal.org/svn/fpc/trunk

........
  r7546 | pierre | 2007-06-02 00:50:37 +0200 (Sat, 02 Jun 2007) | 1 line
  
   * fix 'ppc386 -F' crash
........

git-svn-id: branches/fixes_2_2@7559 -

compiler/options.pas

@@ -677,6 +677,8 @@ begin
 
            'F' :
              begin
+               if more='' then
+                 IllegalPara(opt);
                c:=more[1];
                Delete(more,1,1);
                DefaultReplacements(More);
@@ -1021,6 +1023,8 @@ begin
 
            'S' :
              begin
+               if more='' then
+                 IllegalPara(opt);
                if more[1]='I' then
                  begin
                    if upper(more)='ICOM' then