add sharp x68000 f-line trap support

Ghidra/Processors/68000/data/languages/68000.ldefs

@@ -110,4 +110,24 @@
     <external_name tool="qemu" name="qemu-m68k"/>
   </language>
 
+  <language processor="68000"
+            endian="big"
+            size="32"
+            variant="X68KTrap"
+            version="1.1"
+            slafile="x68ktrap.sla"
+            processorspec="68000.pspec"
+            manualindexfile="../manuals/68000.idx"
+            id="68000:BE:32:X68KTrap">
+    <description>Motorola 32-bit X68KTrap</description>
+    <compiler name="default" spec="68000.cspec" id="default"/>
+    <compiler name="register" spec="68000_register.cspec" id="register"/>
+    <external_name tool="gnu" name="m68k"/>
+    <external_name tool="IDA-PRO" name="68000"/>
+    <external_name tool="IDA-PRO" name="68040"/>
+    <external_name tool="IDA-PRO" name="68K"/>
+    <external_name tool="DWARF.register.mapping.file" name="68000.dwarf"/>
+    <external_name tool="qemu" name="qemu-m68k"/>
+  </language>
+
 </language_definitions>

Ghidra/Processors/68000/data/languages/68000.sinc

@@ -85,6 +85,7 @@ define token instr (16)
   op01 = (0,1)
   op02 = (0,2)
   op03 = (0,3)
+  op07 = (0,7)
   op08 = (0,8)
   op011 = (0,11)
   op015 = (0,15)
@@ -887,7 +888,9 @@ with : extGUARD=1 {
 :atrapm "#"op011 is op=10 & op011 unimpl
 @elif defined(LISATRAP)
 :atrapl "#"t is op=10 & op011; opx015 [ t = op011 * 65536 + opx015; ] unimpl
-@endif # LISATRAP
+@elif defined(X68KTRAP)
+:ftrap "#"op07 is opbig=255 & op07 unimpl
+@endif # X68KTRAP
 
 :abcd Tyb,Txb			is op=12 & op48=16 & Tyb & Txb {
 	CF = carry(Txb,carry(Tyb,XF));

Ghidra/Processors/68000/data/languages/x68ktrap.slaspec

@@ -0,0 +1,2 @@
+@define X68KTRAP ""
+@include "68000.sinc"