ligo/src/proto_alpha/lib_protocol/test/contracts/exec_concat.tz

parameter string;
return string;
storage unit;
code {CAR;
      LAMBDA string string {PUSH string "_abc"; SWAP; CONCAT};
      SWAP; EXEC; UNIT; SWAP; PAIR};