История изменений

Исправление Deleted, 20.03.20 05:30 (текущая версия) :

Расскажи хоть что-нибудь, а то на первый взгляд какая-то лютая смесь:

Питон-стайл и паскаль-стайл:

	import
		SYSTEM
		Strings
		Con = Console
		IO
		Suite = TestHelper

	alias
		assert	= TestHelper.assert
		error		= TestHelper.error
		write		= Con.write
		writeLn	= Con.writeLn
		writeInt= Con.writeDec
		OK 			= TestHelper.ok

Си-стайл и руст-стайл:

	fun testLocalPointer():bool {
		const Val = 777;
		let lx=0;
		var lp:^int = addr(lx);

		lp^=Val;
		return lx==Val
	}

Исходная версия Deleted, 20.03.20 05:28:

Расскажи хоть что-нибудь, а то на первый взгляд какая-то лютая смесь:

Питон-стайл и паскаль-стайл:

	import
		SYSTEM
		Strings
		Con = Console
		IO
		Suite = TestHelper

	alias
		assert	= TestHelper.assert
		error		= TestHelper.error
		write		= Con.write
		writeLn	= Con.writeLn
		writeInt= Con.writeDec
		OK 			= TestHelper.ok

Си-стайил и руст-стайл:

	fun testLocalPointer():bool {
		const Val = 777;
		let lx=0;
		var lp:^int = addr(lx);

		lp^=Val;
		return lx==Val
	}