(DTPtechNote:612) list --> recode

[市川せうぞー <anonymous at unknown-host>]

AppleScriptUsers-MLの引き写しなんだけど、
このやり方、知りませんでした。
をを、エレガント！

on recordFromList(assocList)
	try
		{?class usrf?:assocList}'s x
	on error msg
		run script text 16 thru -2 of msg
	end try
end recordFromList

set l to {"text", "hello", "integer", 3, "real", 12.8, "list", {"a", "b", 3}, "record", {a:1, b:2}}

recordFromList(l)