How can I log out contract addresses in plutus playground?

Developers Smart Contracts
1

This code compiles but it crashes in the simulation:

myValidatorScript1::ValidatorScript
myValidatorScript1 = ValidatorScript$$(Ledger.compileScript[|| (x::Integer) -> x ||])

contractAddress1::Address
contractAddress1 = Ledger.scriptAddress myValidatorScript1

addressText1::Data.Text.Text
addressText1 = read (show contractAddress1)

logAddress1::MonadWallet m => m ()
logAddress1 = Wallet.logMsg addressText1