added the line number when an error occurs

[fast-forth/master.git] / Target.inc

diff --git a/Target.inc b/Target.inc
index e04770e..151374b 100644 (file)
--- a/Target.inc
+++ b/Target.inc
@@ -1,4 +1,4 @@
-; Targe.inc
+; Target.inc
 
 ;-----------------------------------------------------------------------
 ; DEVICE I/O, MEMORY, SFR, vectors and FORTH I/O declarations
@@ -11,137 +11,100 @@ FRAM_FULL   .equ SIGNATURES-50h ; set to protect JTAG and BSL signatures against
                                 ; good practice: one line reserved for each ALLOT command.
 
 
-
-
     OUTRADIX  10
+
+    .IFDEF TERMINALBAUDRATE
     .warning "TERMINAL \{TERMINALBAUDRATE} bds"
+    .endif
     .warning "frequency = \{FREQUENCY} MHz"
 
 
     .IFDEF MSP_EXP430FR5739
     .warning "Code for MSP_EXP430FR5739"
 DEVICE = "MSP430FR5739"
+;CHIP  .equ 5739
 LF_XTAL
 UCA0_UART
 UCB0_SD
+HRDWMPY
+RTC_B 
     .include "MSP430FR57xx.inc"
-    .ENDIF ;  MSP_EXP430FR5739
+    .ENDIF
 
     .IFDEF MSP_EXP430FR5969
     .warning "Code for MSP_EXP430FR5969"
 DEVICE = "MSP430FR5969"
+;CHIP  .equ 5969
 LF_XTAL
 UCA0_UART
 UCA1_SD
+HRDWMPY
+RTC_B 
     .include "MSP430FR5x6x.inc"
-    .ENDIF ; MSP_EXP430FR5969
+    .ENDIF
 
     .IFDEF MSP_EXP430FR5994
     .warning "Code for MSP_EXP430FR5994"
 DEVICE = "MSP430FR5994"
+;CHIP  .equ 5994
 LF_XTAL
 UCA0_UART
 UCB0_SD
+HRDWMPY
+RTC_C 
     .include "MSP430FR5x6x.inc"
-    .ENDIF ; MSP_EXP430FR5994
+    .ENDIF
 
     .IFDEF MSP_EXP430FR6989
     .warning "Code for MSP_EXP430FR6989"
 DEVICE = "MSP430FR6989"
+;CHIP  .equ 6989
 LF_XTAL
 UCA1_UART
 UCA0_SD
+HRDWMPY
+RTC_C 
     .INCLUDE "MSP430FR5x6x.inc"
-    .ENDIF ; MSP_EXP430FR6989
+    .ENDIF
 
     .IFDEF MSP_EXP430FR4133
     .warning "Code for MSP_EXP430FR4133"
 DEVICE = "MSP430FR4133"
+;CHIP  .equ 4133
 LF_XTAL
 UCA0_UART
 UCB0_SD
+RTC     ; define type of RTC
     .INCLUDE "MSP430FR2x4x.inc"
-    .ENDIF ; MSP_EXP430FR4133
+    .ENDIF
 
-    .IFDEF CHIPSTICK_FR2433
-    .warning "Code for CHIPSTICK_FR2433"
+    .IFDEF MSP_EXP430FR2433
+    .warning "Code for MSP_EXP430FR2433"
 DEVICE = "MSP430FR2433"
-UCA0_UART
-UCB0_SD
-    .include "MSP430FR2x4x.inc"
-    .ENDIF ; CHIPSTICK_FR2433
-
-
-    .IFDEF MY_MSP430FR5738
-    .warning "Code for MY_MSP430FR5738"
-DEVICE = "MSP430FR5738"
-LF_XTAL
-UCA0_UART
-UCB0_SD
-    .include "MSP430FR57xx.inc"
-    .ENDIF ; MY_MSP430FR5738
-
-    .IFDEF MY_MSP430FR5734
-    .warning "Code for MY_MSP430FR5734"
-DEVICE = "MSP430FR5734"
-UCA0_UART
-    .include "MSP430FR57xx.inc"
-    .ENDIF ; MY_MSP430FR5734_1
-
-    .IFDEF MY_MSP430FR5738_1
-    .warning "Code for MY_MSP430FR5738_1"
-DEVICE = "MSP430FR5738"
+;CHIP  .equ 2433
 LF_XTAL
 UCA0_UART
-UCB0_SD
-    .include "MSP430FR57xx.inc"
-    .ENDIF ; MY_MSP430FR5738_1
-
-    .IFDEF MY_MSP430FR5948
-    .warning "Code for MY_MSP430FR5948"
-DEVICE = "MSP430FR5948"
-UCA0_UART
 UCA1_SD
-    .include "MSP430FR5x6x.inc"
-    .ENDIF ; MY_MSP430FR5948
-
-    .IFDEF MY_MSP430FR5948_1
-    .warning "Code for MY_MSP430FR5948_1"
-DEVICE = "MSP430FR5948"
-LF_XTAL
-UCA0_UART
-UCA1_SD
-    .include "MSP430FR5x6x.inc"
-    .ENDIF ; MY_MSP430FR5948_1
-
-    .IFDEF JMJ_BOX
-    .warning "Code for JMJ_BOX"
-DEVICE = "MSP430FR5738"
-UCA0_UART
-    .include "MSP430FR57xx.inc"
-    .ENDIF ; JMJ_BOX
-
-    .IFDEF PA8_PA_MSP430
-    .warning "Code for PA8_PA_MSP430"
-DEVICE = "MSP430FR5738"
-UCA0_UART
-    .include "MSP430FR57xx.inc"
-    .ENDIF ; PA8_PA_MSP430
+UCB0_I2CM   ; for TERM2IIC add-on
+I2CTERM_INT .equ reset
+HRDWMPY
+RTC     ; define type of RTC
+    .include "MSP430FR2x4x.inc"
+    .ENDIF
 
-    .IFDEF PA_PA_MSP430
-    .warning "Code for PA_PA_MSP430"
-DEVICE = "MSP430FR5738"
+    .IFDEF CHIPSTICK_FR2433
+    .warning "Code for CHIPSTICK_FR2433"
+DEVICE = "MSP430FR2433"
+;CHIP  .equ 2433
 UCA0_UART
-    .include "MSP430FR57xx.inc"
-    .ENDIF ; PA_PA_MSP430
+UCB0_SD
+HRDWMPY
+RTC     ; define type of RTC
+    .include "MSP430FR2x4x.inc"
+    .ENDIF
 
-    .IFDEF PA_Core_MSP430
-    .warning "Code for PA_Core_MSP430"
-DEVICE = "MSP430FR5948"
-UCA0_UART
-    .include "MSP430FR5x6x.inc"
-    .ENDIF ; PA_Core_MSP430
 
+; define RAM = 1k for MSP430FR57xx devices
     .IF (charfromstr(DEVICE,8) = '5') & (charfromstr(DEVICE,9) = '7') 
 RAM_1K
     .ENDIF
\ No newline at end of file