fcore/text-constants.sml

structure TextConstants =
struct
  val xSpace = 13
  val xSpace3 = xSpace * 3
  val ySpace = 25
  val fontSize: Real32.real = 30.0
end
begin moving text window when cursor goes off screen (currently, we only move the window when cursor goes backwards but this works fine and as expected) 2024-10-28 09:34:55 +00:00			`structure TextConstants =`
			`struct`
			`val xSpace = 13`
			`val xSpace3 = xSpace * 3`
			`val ySpace = 25`
a bit of refactoring to allow addition of more tests 2025-03-22 05:18:25 +00:00			`val fontSize: Real32.real = 30.0`
begin moving text window when cursor goes off screen (currently, we only move the window when cursor goes backwards but this works fine and as expected) 2024-10-28 09:34:55 +00:00			`end`