X-Git-Url: https://deadsoftware.ru/gitweb?p=cpc.git;a=blobdiff_plain;f=src%2Fgeneric%2FDsw%2FMod%2FLinker486Main.cp;h=e08555a5518f8820e5e1cecb5f4da0143a4edb6a;hp=27997e2c3bf946219122604f9b2451a481fc2acc;hb=03a1976c9195cc5b7cbca5be7037b2352e56bff1;hpb=4de97bf7ae01a78248a15ff69031824c5b089e31

diff --git a/src/generic/Dsw/Mod/Linker486Main.cp b/src/generic/Dsw/Mod/Linker486Main.cp
index 27997e2..e08555a 100644
--- a/src/generic/Dsw/Mod/Linker486Main.cp
+++ b/src/generic/Dsw/Mod/Linker486Main.cp
@@ -7,6 +7,8 @@ MODULE DswLinker486Main;
   CONST
     tgtElfStatic = 0; tgtElfExe = 1; tgtElfDll = 2; tgtPeExe = 3; tgtPeDll = 4;
 
+    version = "0.3";
+
   TYPE
     Elem = POINTER TO RECORD
       name: ARRAY 256 OF CHAR;
@@ -103,7 +105,11 @@ MODULE DswLinker486Main;
           inobj.next := obj;
           INC(i)
         ELSIF p = "-trap" THEN
-          LB.trap := TRUE
+          LB.trap := TRUE;
+          Kernel.intTrap := TRUE
+        ELSIF p = "-version" THEN
+          Console.WriteStr(version); Console.WriteLn;
+          Kernel.Quit(0)
         ELSE
           Console.WriteStr("unknown option ");
           Console.WriteStr(p); Console.WriteLn;
@@ -255,5 +261,6 @@ MODULE DswLinker486Main;
   END Init;
 
 BEGIN
+  Kernel.intTrap := FALSE;
   Kernel.Start(Init)
 END DswLinker486Main.