Megatest

;; 
;;     You should have received a copy of the GNU General Public License
;;     along with Megatest.  If not, see <http://www.gnu.org/licenses/>.

;;======================================================================

(declare (unit genexample))
(import
(use posix regex matchable)
 regex matchable
 chicken.file
 chicken.file.posix
 chicken.io
 chicken.process
 chicken.process-context
 chicken.process-context.posix
 chicken.string
 srfi-1
 srfi-69
 srfi-13
	)

(include "db_records.scm")

(define genexample:example-logpro
#<<EOF
  ;; You should have at least one expect:required. This ensures that your process ran
  ;; comment out the line below and replace "put pattern here" with a pattern that will