+ On GO32, GBA and NDS, disable RTL features that aren't implemented.

git-svn-id: trunk@6521 -

compiler/globals.pas

@@ -1198,8 +1198,7 @@ implementation
         LinkLibraryOrder   :=TLinkStrMap.Create;
 
         { enable all features by default }
-        for i:=low(tfeature) to high(tfeature) do
-          include(features,i);
+        features:=[low(Tfeature)..high(Tfeature)];
      end;
 
 end.

compiler/parser.pas

@@ -120,6 +120,12 @@ implementation
              include(supported_calling_conventions,pocall_syscall);
            system_m68k_amiga:
              include(supported_calling_conventions,pocall_syscall);
+           system_arm_gba:
+             features:=features-[f_threading,f_commandargs,f_fileio,f_textio];
+           system_arm_nds:
+             features:=features-[f_threading,f_commandargs,f_fileio,f_textio];
+           system_i386_go32v2:
+             features:=features-[f_threading];
          end;
       end;