From c3d4e39630e9d01914596884934128d4bea2d602 Mon Sep 17 00:00:00 2001 From: Mike Sperber Date: Sat, 28 May 2011 12:31:20 +0200 Subject: [PATCH] Add DMdA teachpacks to documentation check. Also, exclude obsolete DMdA exports from check. --- .../tests/deinprogramm/test-docs-complete.rkt | 26 +++++-------------- 1 file changed, 7 insertions(+), 19 deletions(-) diff --git a/collects/tests/deinprogramm/test-docs-complete.rkt b/collects/tests/deinprogramm/test-docs-complete.rkt index 8d2f712bde..b5cdb6a7c4 100644 --- a/collects/tests/deinprogramm/test-docs-complete.rkt +++ b/collects/tests/deinprogramm/test-docs-complete.rkt @@ -1,22 +1,10 @@ #lang racket/base (require rackunit/docs-complete) -;(check-docs (quote deinprogramm/world)) -;(check-docs (quote deinprogramm/turtle)) -;(check-docs (quote deinprogramm/test-suite)) -;(check-docs (quote deinprogramm/syntax-checkers)) -;(check-docs (quote deinprogramm/run-dmda-code)) -;(check-docs (quote deinprogramm/line3d)) -;(check-docs (quote deinprogramm/image)) -;(check-docs (quote deinprogramm/DMdA)) -;(check-docs (quote deinprogramm/DMdA-vanilla-reader)) -;(check-docs (quote deinprogramm/DMdA-reader)) -;(check-docs (quote deinprogramm/DMdA-beginner-reader)) -;(check-docs (quote deinprogramm/DMdA-assignments-reader)) -;(check-docs (quote deinprogramm/DMdA-advanced-reader)) -;(check-docs (quote deinprogramm/define-record-procedures)) -;(check-docs (quote deinprogramm/convert-explicit)) -(check-docs (quote deinprogramm/DMdA-beginner) #:skip #rx"^#%") -(check-docs (quote deinprogramm/DMdA-vanilla) #:skip #rx"^#%") -(check-docs (quote deinprogramm/DMdA-advanced) #:skip #rx"^#%") -(check-docs (quote deinprogramm/DMdA-assignments) #:skip #rx"^#%") +(check-docs (quote deinprogramm/world)) +(check-docs (quote deinprogramm/image)) + +(check-docs (quote deinprogramm/DMdA-beginner) #:skip #rx"(^#%)|(^\\.\\.)|(^contract$)|(^define-contract$)") +(check-docs (quote deinprogramm/DMdA-vanilla) #:skip #rx"(^#%)|(^\\.\\.)|(^contract$)|(^define-contract$)") +(check-docs (quote deinprogramm/DMdA-advanced) #:skip #rx"(^#%)|(^\\.\\.)|(^contract$)|(^define-contract$)") +(check-docs (quote deinprogramm/DMdA-assignments) #:skip #rx"(^#%)|(^\\.\\.)|(^contract$)|(^define-contract$)")