-/*
- * Copyright (C) 2012, 2013, 2014, 2015
- * Wolfgang Bumiller
- * Dale Weiler
- *
- * Permission is hereby granted, free of charge, to any person obtaining a copy of
- * this software and associated documentation files (the "Software"), to deal in
- * the Software without restriction, including without limitation the rights to
- * use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies
- * of the Software, and to permit persons to whom the Software is furnished to do
- * so, subject to the following conditions:
- *
- * The above copyright notice and this permission notice shall be included in all
- * copies or substantial portions of the Software.
- *
- * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
- * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
- * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
- * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
- * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
- * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
- * SOFTWARE.
- */
#include <string.h>
#include <stdlib.h>
#include <sys/stat.h>
{
pptoken *token = (pptoken*)mem_a(sizeof(pptoken));
token->token = ftepp->token;
-#if 0
- if (token->token == TOKEN_WHITE)
- token->value = util_strdup(" ");
- else
-#else
- token->value = util_strdup(ftepp_tokval(ftepp));
-#endif
+ token->value = util_strdup(ftepp_tokval(ftepp));
memcpy(&token->constval, &ftepp->lex->tok.constval, sizeof(token->constval));
return token;
}
static char *ftepp_include_find_path(const char *file, const char *pathfile)
{
- fs_file_t *fp;
+ FILE *fp;
char *filename = NULL;
const char *last_slash;
size_t len;
memcpy(vec_add(filename, len+1), file, len);
vec_last(filename) = 0;
- fp = fs_file_open(filename, "rb");
+ fp = fopen(filename, "rb");
if (fp) {
- fs_file_close(fp);
+ fclose(fp);
return filename;
}
vec_free(filename);
{
if (ftepp->token >= TOKEN_EOF)
break;
-#if 0
- newline = true;
-#endif
-
switch (ftepp->token) {
case TOKEN_KEYWORD:
case TOKEN_IDENT: