diff --git a/compiler/systems/t_nds.pas b/compiler/systems/t_nds.pas
index d6964e2d70..01faa975d7 100644
--- a/compiler/systems/t_nds.pas
+++ b/compiler/systems/t_nds.pas
@@ -758,6 +758,13 @@ begin
         true,false);
     end;
 
+  if success and (apptype=app_arm9) then 
+    begin
+      success:=DoExec(FindUtil('ndstool'), '-c ' + 
+        ChangeFileExt(current_module.exefilename^, '.nds') + ' -9 ' + 
+        ChangeFileExt(current_module.exefilename^, preName+target_info.exeext),
+        true,false);
+    end;
   MakeExecutable:=success;   { otherwise a recursive call to link method }
 end;