From 9568d7a844ba6a1872a8e8f6ef002860057e62ab Mon Sep 17 00:00:00 2001 From: peb Date: Fri, 18 Feb 2005 18:21:06 +0000 Subject: "Committed_by_peb" --- src/GF/Grammar/Lockfield.hs | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) (limited to 'src/GF/Grammar/Lockfield.hs') diff --git a/src/GF/Grammar/Lockfield.hs b/src/GF/Grammar/Lockfield.hs index f7ec081bd..6ad6db206 100644 --- a/src/GF/Grammar/Lockfield.hs +++ b/src/GF/Grammar/Lockfield.hs @@ -1,15 +1,17 @@ ---------------------------------------------------------------------- -- | --- Module : (Module) --- Maintainer : (Maintainer) +-- Module : Lockfield +-- Maintainer : AR -- Stability : (stable) -- Portability : (portable) -- --- > CVS $Date $ --- > CVS $Author $ --- > CVS $Revision $ +-- > CVS $Date: 2005/02/18 19:21:12 $ +-- > CVS $Author: peb $ +-- > CVS $Revision: 1.5 $ -- -- Creating and using lock fields in reused resource grammars. +-- +-- AR 8\/2\/2005 detached from 'compile/MkResource' ----------------------------------------------------------------------------- module Lockfield (lockRecType, unlockRecord, lockLabel, isLockLabel) where @@ -21,8 +23,6 @@ import PrGrammar import Operations --- AR 8/2/2005 detached from compile/MkResource - lockRecType :: Ident -> Type -> Err Type lockRecType c t@(RecType rs) = let lab = lockLabel c in -- cgit v1.2.3