summaryrefslogtreecommitdiff
path: root/Request.hs
diff options
context:
space:
mode:
authorAndrew Guschin <saintruler@gmail.com>2020-11-26 13:55:55 +0400
committerAndrew Guschin <saintruler@gmail.com>2020-11-26 13:55:55 +0400
commit446602fe336ad1c2a23e3d50d7cd1d1356fcc9de (patch)
tree74b8a1ca93c17d22f7876f6aba80ee10c3851d3b /Request.hs
Initial commit
Diffstat (limited to 'Request.hs')
-rw-r--r--Request.hs9
1 files changed, 9 insertions, 0 deletions
diff --git a/Request.hs b/Request.hs
new file mode 100644
index 0000000..a0c18d7
--- /dev/null
+++ b/Request.hs
@@ -0,0 +1,9 @@
+module Request where
+
+data Request = Request String String String
+
+getQuery (Request query _ _) = query
+
+getUrl (Request _ url _) = url
+
+getMethod (Request _ _ method) = method \ No newline at end of file