From 7b6ed1e95bef26f4ae85d7471985128c0dfdbc15 Mon Sep 17 00:00:00 2001
From: herbelin
Date: Thu, 1 Mar 2001 14:02:59 +0000
Subject: Déplacement de qualid dans Nametab, hors du noyau

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1419 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 pretyping/pretype_errors.ml | 3 ---
 1 file changed, 3 deletions(-)

(limited to 'pretyping/pretype_errors.ml')

diff --git a/pretyping/pretype_errors.ml b/pretyping/pretype_errors.ml
index dbc717fc0d..ff57b0012c 100644
--- a/pretyping/pretype_errors.ml
+++ b/pretyping/pretype_errors.ml
@@ -13,9 +13,6 @@ let raise_pretype_error (loc,k,ctx,te) =
 let error_var_not_found_loc loc k s =
   raise_pretype_error (loc,k, Global.env() (*bidon*), VarNotFound s)
 
-let error_global_not_found_loc loc q =
-  raise_pretype_error (loc,CCI, Global.env() (*bidon*), QualidNotFound q)
-
 let error_cant_find_case_type_loc loc env expr =
   raise_pretype_error (loc, CCI, env, CantFindCaseType expr)
 
-- 
cgit v1.2.3