AIR/jade
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Fixed Reference variable in FORMAT

Browse Source
This commit is contained in:
Armando Rivera 2015-03-29 22:45:08 -04:00
parent 5bb242cd97
commit a7eaa4cfc6
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
runtime.inc
View File

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