:-object hello_world2.

var count=0.

main:-
	repeat, 
		format('hello, world~w~n',[count]),
		++count,
	count > 100,
	!.

:-end_object hello_world2.