a function to enter string

[Gary Wessle <phddas@yahoo.com>]

Hi

I have this key macro in my emacs which puts "#include <string>" in
the first blank line in the buffer, also another key macro which puts
the string "std::string" at the point.

(fset 'str
   [?\M-<?\M-} ?# ?i ?n ?c ?l ?u ?d ?e ?  ?< ?s ?t ?r ?i ?n ?g ?>
   return])

(fset ':s
   "std::string")

I want when I type M-x :s  which is the second key macro above, it
puts the string "std::string" at point as well as checks to see if
"#include <string>" is at the top of the buffer, if not it inserts
it so that I don't have to do it.

how can this be done?

many thanks.