Fixed Reference variable in FORMAT

This commit is contained in:
Armando Rivera 2015-03-29 22:45:08 -04:00
parent 5bb242cd97
commit a7eaa4cfc6

View File

@ -14,7 +14,7 @@ DECLARE FUNCTION CSTRING ENC$ (CSTRING,INT=34,INT=34);
DECLARE FUNCTION CSTRING REVERSE$ (CSTRING);
DECLARE FUNCTION CSTRING REPLACE$ (CSTRING subject, CONSTANT CSTRING& search, CONSTANT CSTRING& replace);
DECLARE FUNCTION INT VAL (CSTRING);
DECLARE FUNCTION CSTRING FORMAT$ (CONSTANT CSTRING &fmt, ...);
DECLARE FUNCTION CSTRING FORMAT$ (CONSTANT CSTRING fmt, ...);
DECLARE FUNCTION VECTOR<CSTRING> SPLIT (CONSTANT CSTRING input, CONSTANT CSTRING separators, BOOL remove_empty = TRUE);
DECLARE SUB PRINT (CSTRING);
DECLARE SUB SAVEFILE(CSTRING src, CSTRING fname);
@ -36,7 +36,7 @@ FUNCTION VECTOR<CSTRING> SPLIT (CONSTANT CSTRING input, CONSTANT CSTRING separat
RETURN lst;
ENDFUNCTION
FUNCTION CSTRING FORMAT$ (CONSTANT CSTRING &fmt, ...) BEGIN
FUNCTION CSTRING FORMAT$ (CONSTANT CSTRING fmt, ...) BEGIN
DIM AS VECTOR<char> str(100,'\0');
DIM AS va_list ap;
DIM AS INT n;