Oops. Needed one more line to be a valid proof:


local fn DefinitelyNeedsRegsisterVariables

dim as Str255       s
dim as CFStringRef  cfStr
dim as Boolean      ignore

s = "This is a test string"

cfStr = fn CFStringCreateWithPascalString( 0, @s, _kCFStringEncodingMacRoman )

s = ""

ignore = fn CFStringGetPascalString( cfStr, @s, 256, 
_kCFStringEncodingMacRoman )

print s

end fn

fn DefinitelyNeedsRegsisterVariables

do
HandleEvents
until gFBQuit