ApostropheFixes.i7x

Version 1 of Apostrophe Fixes by Jonathan Simmons begins here.

Section 1 - Wrappers

To fix curly apostrophes:
	(- CurlyQuoteFix(); players_command = 100 + WordCount();  -)


Section 2 (for Z-machine only)

Include (-

[ CurlyQuoteFix i;
	for (i = 2 : i <= (buffer->1) + 1 : i++)
	{ 
		if ((buffer->i) == '?') 
		{	buffer->i = 39;  
		}
	}
	VM_Tokenise(buffer, parse);
];

-)


Section 3 (for Glulx only) 

Include (-

[ CurlyQuoteFix i;
	for (i = WORDSIZE : i <= (buffer-->0)+(WORDSIZE-1) : i++)	{ 
		if ((buffer->i) == '?') 
		{	buffer->i = 39;  
		}
	}
	VM_Tokenise(buffer, parse);
];

-)

	
Apostrophe Fixes ends here.