RosettaCodeData/Task/HTTPS/Seed7/https.seed7

9 lines
176 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
$ include "seed7_05.s7i";
include "gethttps.s7i";
include "utf8.s7i";
const proc: main is func
begin
writeln(STD_UTF8_OUT, getHttps("sourceforge.net"));
end func;