GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-22 19:22:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

edit command ct pos

Browse Source
This commit is contained in:
aarne
2005-08-17 13:43:50 +00:00
parent 40c5d63eb3
commit 187df7ffa8
2 changed files with 13 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
src/GF/Shell/CommandL.hs
View File

@@ -5,9 +5,9 @@
-- Stability : (stable)
-- Portability : (portable)
--
-- > CVS $Date: 2005/06/11 20:27:05 $
-- > CVS $Date: 2005/08/17 14:43:50 $
-- > CVS $Author: aarne $
-- > CVS $Revision: 1.19 $
-- > CVS $Revision: 1.20 $
--
-- (Description of the module)
-----------------------------------------------------------------------------
@@ -110,6 +110,7 @@ pCommandMsg s = (m,pCommandWords $ words c) where
"'" : _ -> CTop
"+" : _ -> CLast
"mp" : p -> CMovePosition (readIntList (unwords p))
"ct" : p -> CCopyPosition (readIntList (unwords p))
"r" : f : _ -> CRefineWithAtom f
"w" : f:i : _ -> CWrapWithFun (f, readIntArg i)
"ch": f : _ -> CChangeHead f