; -*- scheme -*-

; this is an example of an empty state file. note that state files
; when written by the application do not preserve comments or
; formatting. this is only for initialization.

((forth)
 (asm)
 (dict)
 
 (file
  (prj           "prj/purrr18")     ;; project directory
  (path          "pic18")           ;; project forth load path (next to local)
  (state         "monitor.state")   ;; this file
  (monitor       "monitor.f")       ;; monitor source code
  (hex           "monitor.hex")     ;; intel .hex binary output
  (port          "/dev/ttyS0")    ;; serial port connected to device 
  (application   "debug.f"))        ;; application toplevel source file

 ;; chip configuration bits (see data sheet)
 (config-bits
  '(#x30000000
    (#x00 #xC8 #x0F #x00
     #x00 #x80 #x80 #x00
     #x03 #xC0 #x03 #xE0
     #x03 #x40)))
 
 ;; the list of interpreters accessible by CTRL-D
 (consoles live-mode
           compile-mode
           cat-mode)

 ;; cat data stack
 (stack)

 ;; mode hooks
 (hook  (enter-compile)
        (enter-interpret)
        (enter-dtc-compile)
        (enter-dtc-interpret)
        (enter-cat)))