how to prepend string?

[WingDust]

(func bothS (param input str) (result str)

    (return   (<< input "'") )
)
(func main (result int)
    (print (call bothS "aa"))
    (return 0)  
)

I want to ouput 'aa' ,how to do ?

[jacoblister]

It just appends to the string one string at a time. So you can do

(func bothS (param input str) (result str)
    (let res str (alloc str))
    (<< res "'")
    (<< res input)
    (<< res "'")

    (return res)
)
(func main (result int)
    (print (call bothS "aa"))
    (return 0)  
)