"test/html.factor"
"test/httpd.factor"
"test/url-encoding.factor"
+ "test/embedded.factor"
} } ;
USE: httpd
--- /dev/null
+IN: temporary
+USING: io embedded kernel test ;
+
+[ t ] [
+ "libs/httpd/test/example.fhtml" resource-path
+ [ run-embedded-file ] string-out
+
+ "libs/httpd/test/example.html"
+ resource-path <file-reader> contents
+ =
+] unit-test
--- /dev/null
+<% USING: math ; %>
+
+<html>
+ <head><title>Simple Embedded Factor Example</title></head>
+ <body>
+ <% 5 [ %><p>I like repetition</p><% ] times %>
+ </body>
+</html>
--- /dev/null
+
+
+<html>
+ <head><title>Simple Embedded Factor Example</title></head>
+ <body>
+ <p>I like repetition</p><p>I like repetition</p><p>I like repetition</p><p>I like repetition</p><p>I like repetition</p>
+ </body>
+</html>