* typecast to get it compiling again · 2b2a998ce6 - Gogs

* typecast to get it compiling again

marco 21 years ago

parent

1680140105

commit

2b2a998ce6

1 changed files with 1 additions and 1 deletions

Unified View Show Diff Stats

						
							+ 1
							
							- 1
						
docs/refex/ex64.pp
							 
								View File
							
															@@ -5,5 +5,5 @@ Var
														
															   P :Longint;
														
															   P :Longint;
														
															 begin
														
															 begin
														
															-  P:=Sptr; { P Contains now the current stack position. }
														
															+  P:=Longint(Sptr); { P Contains now the current stack position. }
														
															 end.
														
															 end.