소스 검색

improved code: moved to low level system connect code

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@6904 8c9fc860-2736-0410-a75d-ab315db34111
felixf 9 년 전
부모
커밋
31262e0151
1개의 변경된 파일3개의 추가작업 그리고 3개의 파일을 삭제
  1. 3 3
      source/ActiveCellsRuntime.mod

+ 3 - 3
source/ActiveCellsRuntime.mod

@@ -500,17 +500,17 @@ type
 	
 	operator ">>"* (pout: Pout; pin: Pin); 
 	begin
-		connect(pout, pin);
+		Connect(system.val(any, pout), system.val(any, pin), 0);
 	end ">>";
 	
 	operator ">>"* (p0: Pout; p1: Pout); 
 	begin
-		delegate(p0,p1);
+		Delegate(system.val(any, p0), system.val(any, p1));
 	end ">>";
 	
 	operator ">>"* (p0: Pin; p1: Pin); 
 	begin
-		delegate(p0,p1);
+		Delegate(system.val(any, p0), system.val(any, p1));
 	end ">>";
 end ActiveCellsRuntime.