;;; basic-test.el -- Test Suite for basic.el
;;
;;; Copyright (C) 2008 Kyle W T Sherman
;;
;; Author:   Kyle W T Sherman <kylewsherman at gmail dot com>
;; Created:  2008-03-29
;; Version:  0.1
;; Keywords: basic compiler interpreter mode
;;
;;; Commentary:
;;
;; Tests `basic.el' functionality.
;;
;;; Installation:
;;
;; Load `basic-test.el':
;;
;;   (load "basic-test.el")
;;
;;; Usage:
;;
;; Run tests:
;;
;;   (???)

;;; Code:

;; basic
(require 'basic)

(defconst test1
  "
10 REM test BASIC example program
20 PRINT "This is a test program"
30 PRINT "Summing the values between 1 and 100"
40 LET total = 0
50 FOR I = 1 TO 100
60     LET total = total + i
70 NEXT I
80 PRINT "The total of all digits between 1 and 100 is " total
90 END
"
"BASIC test1.")

;;; basic-test.el ends here