From 1dbe832a2826be88eda5fb1229576108bd133d69 Mon Sep 17 00:00:00 2001
From: PHO <pho@cielonegro.org>
Date: Tue, 9 Mar 2010 15:16:32 +0900
Subject: [PATCH] Makefiles

---
 GNUmakefile                         |  5 ++
 Text/XML/HXT/Compilation/XmlTree.hs |  8 ++-
 cabal-package.mk                    | 95 +++++++++++++++++++++++++++++
 3 files changed, 106 insertions(+), 2 deletions(-)
 create mode 100644 GNUmakefile
 create mode 100644 cabal-package.mk

diff --git a/GNUmakefile b/GNUmakefile
new file mode 100644
index 0000000..749bae3
--- /dev/null
+++ b/GNUmakefile
@@ -0,0 +1,5 @@
+RUN_COMMAND = ./dist/build/hxt-compile/hxt-compile
+
+CONFIGURE_ARGS = -O0
+
+include cabal-package.mk
diff --git a/Text/XML/HXT/Compilation/XmlTree.hs b/Text/XML/HXT/Compilation/XmlTree.hs
index 37bb842..7f8d48b 100644
--- a/Text/XML/HXT/Compilation/XmlTree.hs
+++ b/Text/XML/HXT/Compilation/XmlTree.hs
@@ -68,5 +68,9 @@ a $: b = HsApp a b
 
 
 compileQName :: QName -> HsExp
-compileQName (QN prefix local ns)
-    = unq "mkQName" $: litStr prefix $: litStr local $: litStr ns
+compileQName qn
+    = let prefix = namePrefix   qn
+          local  = localPart    qn
+          ns     = namespaceUri qn
+      in
+        unq "mkQName" $: litStr prefix $: litStr local $: litStr ns
diff --git a/cabal-package.mk b/cabal-package.mk
new file mode 100644
index 0000000..d8bbaad
--- /dev/null
+++ b/cabal-package.mk
@@ -0,0 +1,95 @@
+# -*- makefile-gmake -*-
+#
+# Variables:
+#
+#   CONFIGURE_ARGS :: arguments to be passed to ./Setup configure
+#     default: --disable-optimization
+#
+#   RUN_COMMAND :: command to be run for "make run"
+#
+
+GHC      ?= ghc
+FIND     ?= find
+RM_RF    ?= rm -rf
+SUDO     ?= sudo
+AUTOCONF ?= autoconf
+HLINT    ?= hlint
+
+CONFIGURE_ARGS ?= --disable-optimization
+
+SETUP_FILE := $(wildcard Setup.*hs)
+CABAL_FILE := $(wildcard *.cabal)
+
+ifeq ($(shell ls configure.ac 2>/dev/null),configure.ac)
+  AUTOCONF_AC_FILE := configure.ac
+  AUTOCONF_FILE    := configure
+else
+  ifeq ($(shell ls configure.in 2>/dev/null),configure.in)
+    AUTOCONF_AC_FILE := configure.in
+    AUTOCONF_FILE    := configure
+  else
+    AUTOCONF_AC_FILE :=
+    AUTOCONF_FILE    :=
+  endif
+endif
+
+BUILDINFO_IN_FILE := $(wildcard *.buildinfo.in)
+BUILDINFO_FILE    := $(BUILDINFO_IN_FILE:.in=)
+
+all: build
+
+build: setup-config build-hook
+	./Setup build
+
+build-hook:
+
+ifeq ($(RUN_COMMAND),)
+run:
+	@echo "cabal-package.mk: No command to run."
+	@echo "cabal-package.mk: If you want to run something, define RUN_COMMAND variable."
+else
+run: build
+	@echo ".:.:. Let's go .:.:."
+	$(RUN_COMMAND)
+endif
+
+setup-config: dist/setup-config setup-config-hook $(BUILDINFO_FILE)
+
+setup-config-hook:
+
+dist/setup-config: $(CABAL_FILE) Setup $(AUTOCONF_FILE)
+	./Setup configure $(CONFIGURE_ARGS)
+
+$(AUTOCONF_FILE): $(AUTOCONF_AC_FILE)
+	$(AUTOCONF)
+
+$(BUILDINFO_FILE): $(BUILDINFO_IN_FILE) configure
+	./Setup configure $(CONFIGURE_ARGS)
+
+Setup: $(SETUP_FILE)
+	$(GHC) --make Setup
+
+clean: clean-hook
+	$(RM_RF) dist Setup *.o *.hi .setup-config *.buildinfo
+	$(FIND) . -name '*~' -exec rm -f {} \;
+
+clean-hook:
+
+doc: setup-config
+	./Setup haddock
+
+install: build
+	$(SUDO) ./Setup install
+
+sdist: setup-config
+	./Setup sdist
+
+test: build
+	./Setup test
+
+lint:
+	$(HLINT) . --report \
+		--ignore="Use string literal" \
+		--ignore="Use concatMap"
+
+.PHONY: build build-hook setup-config setup-config-hook run clean clean-hook install doc sdist test lint
-- 
2.40.0