msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

move the prelude sources to the prelude directory and add the resource library to cabal

Browse Source
This commit is contained in:
krasimir
2008-06-19 14:16:05 +00:00
parent 0808aa8936
commit b7be040be6
11 changed files with 541 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
lib/prelude/HTML.gf Normal file
View File

@@ -0,0 +1,8 @@
resource HTML = open Prelude in {
oper
tag : Str -> Str = \t -> "<" + t + ">" ;
endtag : Str -> Str = \t -> tag ("/" + t) ;
intag : Str -> Str -> Str = \t,s -> tag t ++ s ++ endtag t ;
intagAttr : Str -> Str -> Str -> Str =
\t,a,s -> ("<" + t) ++ (a + ">") ++ s ++ endtag t ;
}