Changeset 13017

Timestamp:

Oct 13, 2009, 9:48:16 PM (15 years ago)

Author:

R. Matthew Emerson

Message:

New file x86-watch.lisp, containing code to emulate some common x86
instructions that might cause a write-to-watched-object to be signaled.

Make compile-ccl compile and load x86-watch on x86 systems.

Location:

trunk/source/lib

Files:

• compile-ccl.lisp (modified) (1 diff)
• systems.lisp (modified) (1 diff)
• x86-watch.lisp (added)

trunk/source/lib/compile-ccl.lisp

@@ -175 +175 @@
           (case target
             ((:ppc32 :ppc64) '(ppc-backtrace ppc-disassemble))
-            ((:x8632 :x8664) '(x86-backtrace x86-disassemble)))))
+            ((:x8632 :x8664) '(x86-backtrace x86-disassemble x86-watch)))))
           
 

trunk/source/lib/systems.lisp

@@ -161 +161 @@
     (ppc-backtrace    "ccl:bin;ppc-backtrace"    ("ccl:lib;ppc-backtrace.lisp"))
     (x86-backtrace    "ccl:bin;x86-backtrace"    ("ccl:lib;x86-backtrace.lisp"))
+    (x86-watch        "ccl:bin;x86-watch"        ("ccl:lib;x86-watch.lisp"))
     (backtrace-lds    "ccl:bin;backtrace-lds"    ("ccl:lib;backtrace-lds.lisp"))
     (apropos          "ccl:bin;apropos"          ("ccl:lib;apropos.lisp"))