1 files changed, 5 insertions, 0 deletions
diff --git a/ortho/mcode/ortho_jit.adb b/ortho/mcode/ortho_jit.adb
index c92454259..7aa9724f2 100644
--- a/ortho/mcode/ortho_jit.adb
+++ b/ortho/mcode/ortho_jit.adb
@@ -117,4 +117,9 @@ package body Ortho_Jit is
       Put_Line (" --snap=FILE    Write memory snapshot to FILE");
    end Disp_Help;
 
+   function Get_Jit_Name return String is
+   begin
+      return "mcode";
+   end Get_Jit_Name;
+
 end Ortho_Jit;