I’m not familiar with exactly what he did, but it’s often more complex than that. Comparisons often include text I/O, for example, and Ada.Text_IO is more complex than C’s text-I/O facilities.
Ada.Text_IO.Put_Line (Item => "Hello");
does more than just output “Hello”. It also sets the current column to 1 and increments the current line. Depending on how it’s implemented, it could also increment the current column 5 times before setting it to 1. Even importing the C subprograms and calling them using Interfaces.C.To_C introduces additional operations not present in the C.