summaryrefslogtreecommitdiff
path: root/checklink/Frameworks.ml
diff options
context:
space:
mode:
authorGravatar varobert <varobert@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>2012-07-12 15:13:21 +0000
committerGravatar varobert <varobert@fca1b0fc-160b-0410-b1d3-a4f43f01ea2e>2012-07-12 15:13:21 +0000
commite5d9686068fb9ee30d45d9fc6c933facbd402f68 (patch)
treec19161210593420fbcf90866830bbf054d8fddef /checklink/Frameworks.ml
parent5b99eec6f36dbac9d59d519cc58ce37dd6251abe (diff)
checklink: dead and debug code elimination
git-svn-id: https://yquem.inria.fr/compcert/svn/compcert/trunk@1974 fca1b0fc-160b-0410-b1d3-a4f43f01ea2e
Diffstat (limited to 'checklink/Frameworks.ml')
-rw-r--r--checklink/Frameworks.ml2
1 files changed, 0 insertions, 2 deletions
diff --git a/checklink/Frameworks.ml b/checklink/Frameworks.ml
index 92f110c..074a432 100644
--- a/checklink/Frameworks.ml
+++ b/checklink/Frameworks.ml
@@ -28,8 +28,6 @@ type byte_chunk_desc =
| Padding
| Unknown of string
-let add_uniq x l = if List.mem x l then l else x :: l
-
(* This type specifies whether its argument was inferred by the tool or provided
via a config file. *)
type 'a inferrable =