This is a hack, but for the moment forcing setting pen position fixes text positioning issues. Also removing commented code

1 files changed, 6 insertions, 6 deletions

diff --git a/pictCCall_12.icl b/pictCCall_12.icl
index e7c7b55..193664d 100644
--- a/pictCCall_12.icl
+++ b/pictCCall_12.icl
@@ -604,7 +604,7 @@ winDrawPoint _ _
 	= code

 	{

 		.inline WinDrawPoint

-			ccall WinDrawPoint "IIII-II"

+			ccall WinDrawPoint "IIpI-pI"

 		.end

 	}

 

@@ -614,7 +614,7 @@ winLinePen _ _
 	= code

 	{

 		.inline WinLinePen

-			ccall WinLinePen "IIII-II"

+			ccall WinLinePen "IIpI-pI"

 		.end

 	}

 

@@ -623,7 +623,7 @@ winLinePenTo _ _
 	= code

 	{

 		.inline WinLinePenTo

-			ccall WinLinePenTo "IIII-II"

+			ccall WinLinePenTo "IIpI-pI"

 		.end

 	}

 

@@ -632,7 +632,7 @@ winMovePen _ _
 	= code

 	{

 		.inline WinMovePen

-			ccall WinMovePen "IIII-II"

+			ccall WinMovePen "IIpI-pI"

 		.end

 	}

 

@@ -641,7 +641,7 @@ winMovePenTo _ _
 	= code

 	{

 		.inline WinMovePenTo

-			ccall WinMovePenTo "IIII-II"

+			ccall WinMovePenTo "IIpI-pI"

 		.end

 	}

 

@@ -650,7 +650,7 @@ winGetPenPos _
 	= code

 	{	

 		.inline WinGetPenPos

-			ccall WinGetPenPos "II-IIII"

+			ccall WinGetPenPos "Ip-IIII"

 		.end

 	}