Sākums Izpētīt Palīdzība
Pierakstīties
pascal
/
freepascal.compiler
spogulis no https://gitlab.com/freepascal.org/fpc/source.git
2
0
Atdalīts 0
Faili Problēmas 0 Vikivietne
Pārlūkot izejas kodu

* test only with longint to byte typecast

pierre 23 gadi atpakaļ
vecāks
03f1fef7aa
revīzija
dbb291bc0b
1 mainītis faili ar 10 papildinājumiem un 0 dzēšanām
Dalītais skats Rādīt salīdzināšanas statistiku
  1. 10 0
      tests/tbf/tb0107a.pp

+ 10 - 0
tests/tbf/tb0107a.pp
Parādīt failu 

@@ -0,0 +1,10 @@
 
+{ %FAIL }
 
+
 
+var
 
+  i : longint;
 
+  j : word;
 
+
 
+begin
 
+  j:=5;
 
+  byte(i):=j;
 
+end.