Fix a crash in from:withLength when given a negative length. Fix a bug in trim that was causing it to give a negative length to from:withLength

#{
	value <- 42
	main <- {
		foo <- {
			bar <- {value}
			bar:
		}
		print: (string: (foo: ))
	}
}