'string.sbp
'文字列変数の操作用

#ifndef _INC_BASIC_STRING
#define _INC_BASIC_STRING

Function StrPtr(buf As *Char) As *Char
	StrPtr = buf
End Function

Function ZeroString(length As Long) As String
	Dim str As String
	str.ReSize(length)
	Return str
End Function

Function MakeStr(pBuf As *Char) As String
	Dim temp As String(pBuf)
	Return temp
End Function

#endif '_INC_BASIC_STRING