Undefined values: Difference between revisions
Content added Content deleted
m (→{{header|Wren}}: Changed to Wren S/H) |
(PascalABC.NET) |
||
| Line 973: | Line 973: | ||
=={{header|Pascal}}== |
=={{header|Pascal}}== |
||
See [[Undefined_values#Delphi | Delphi]] |
See [[Undefined_values#Delphi | Delphi]] |
||
=={{header|PascalABC.NET}}== |
|||
<syntaxhighlight lang="delphi"> |
|||
function Gen: integer? := Random(2)=0 ? 777 : nil; |
|||
begin |
|||
var i: integer?; |
|||
i := Gen(); |
|||
if i.HasValue then |
|||
Print(i.Value) |
|||
else Print('No value') |
|||
end. |
|||
</syntaxhighlight> |
|||
=={{header|Perl}}== |
=={{header|Perl}}== |
||