diff --git a/test.html b/test.html deleted file mode 100644 index b6023be..0000000 --- a/test.html +++ /dev/null @@ -1,2 +0,0 @@ - -
???
5.3.4.6

(define x 1)
  (define y 2)
3

 
diff --git a/test.scrbl b/test.scrbl deleted file mode 100644 index b1973b5..0000000 --- a/test.scrbl +++ /dev/null @@ -1,8 +0,0 @@ -#lang scribble/manual -@(require scribble/eval) -@(require (for-label racket)) -@(define the-eval (make-base-eval)) -@codeblock{ - (+ 1 2) - (+ 3 4)} -@interaction-eval-show[#:eval the-eval \#lang racket] diff --git a/xml-parse-testing.rkt b/xml-parse-testing.rkt deleted file mode 100644 index ceae058..0000000 --- a/xml-parse-testing.rkt +++ /dev/null @@ -1,17 +0,0 @@ -#lang racket (require xml) - -(define xe (xml->xexpr (document-element (with-input-from-file "test.html" read-xml)))) - -(require xml/path) - -(define lst (car (filter - (λ (div) - (equal? "main" (se-path* '(div #:class) div))) - (se-path*/list '(div) xe)))) -lst -;(define paras (cdddr lst)) -;(cons (car lst) (cons (cadr lst) -; (cdddr lst))) - -;(match lst -; [`( \ No newline at end of file