remove accProject (no longer used)

Ide/IdeState.dcl

@@ -33,7 +33,6 @@ instance Consoler	General		// Console
 getProject :: !*(PSt *General) -> (Project,*PSt *General)
 setProject :: !Project !*(PSt *General) -> *PSt *General
 appProject :: (Project -> Project) !*(PSt *General) -> *PSt *General
-accProject :: (Project -> (.a,Project)) !*(PSt *General) -> (.a,*PSt *General)
 getFromProject :: (Project -> .a) !*(PSt *General) -> (!.a,!*PSt *General)
 
 getCompilerProcessIds :: !*(PSt *General) -> (!CompilerProcessIds,!*(PSt *General))

Ide/IdeState.icl

@@ -80,12 +80,6 @@ setProject prj ps = appPLoc (\l->{l & project = prj}) ps
 appProject :: (Project -> Project) !*(PSt *General) -> *(PSt *General)
 appProject f ps = appPLoc (\l=:{project}->{l & project = f project}) ps
 
-accProject :: (Project -> (.a,Project)) !*(PSt *General) -> (.a,*(PSt *General))
-accProject f ps
-	# (prj,ps) = ps!ls.project
-	# (res,prj) = f prj
-	= (res,{ps & ls.project = prj})
-
 getFromProject :: (Project -> .a) !*(PSt *General) -> (!.a,!*PSt *General)
 getFromProject f ps=:{ls={project}}
 	= (f project,ps)