String comparison: Difference between revisions
Content added Content deleted
m (→{{header|Ada}}) |
m (→{{header|Ada}}) |
||
Line 37: | Line 37: | ||
begin |
begin |
||
Ada.Text_IO.Put_Line |
Ada.Text_IO.Put_Line |
||
( |
(""" & A & """ and """ & B & """: " & |
||
(if A = B then |
(if A = B then |
||
"equal, " |
"equal, " |