moving to project folder

This commit is contained in:
Kyle Isom 2025-04-10 22:49:24 -07:00
parent 00f1dfe790
commit 24ad0cf680
16 changed files with 3 additions and 6 deletions

View File

@ -195,6 +195,7 @@ fn_sym_def(object *args, object *env)
} }
>>>>>>> 5392bac (moving to project folder)
object * object *
fn_listlibrary2(object *args, object *env) fn_listlibrary2(object *args, object *env)
{ {
@ -367,7 +368,6 @@ fn_sd_rename(object *args, object *env)
char buffer1[BUFFERSIZE]; char buffer1[BUFFERSIZE];
char buffer2[BUFFERSIZE]; char buffer2[BUFFERSIZE];
object *pathFrom = car(args); object *pathFrom = car(args);
if (!stringp(pathFrom)) { if (!stringp(pathFrom)) {
error2("filenames must be strings."); error2("filenames must be strings.");
@ -392,7 +392,6 @@ fn_sd_remove(object *args, object *env)
(void) env; (void) env;
char buffer[BUFFERSIZE]; char buffer[BUFFERSIZE];
object *arg = car(args); object *arg = car(args);
if (!SD.remove(MakeFilename(arg, buffer))) { if (!SD.remove(MakeFilename(arg, buffer))) {
return nil; return nil;
@ -407,7 +406,6 @@ fn_sd_existsp(object *args, object *env)
(void) env; (void) env;
char buffer[BUFFERSIZE]; char buffer[BUFFERSIZE];
object *arg = car(args); object *arg = car(args);
if (!SD.exists(MakeFilename(arg, buffer))) { if (!SD.exists(MakeFilename(arg, buffer))) {
return nil; return nil;
@ -466,9 +464,8 @@ fn_sd_list(object *args, object *env)
{ {
(void) env; (void) env;
SDBegin();
char *sd_path_buf = NULL; char *sd_path_buf = NULL;
SDBegin();
File root; File root;
object *result = cons(NULL, NULL); object *result = cons(NULL, NULL);
object *ptr = result; object *ptr = result;
@ -476,8 +473,8 @@ fn_sd_list(object *args, object *env)
if (args != NULL) { if (args != NULL) {
object *arg1 = checkstring(first(args)); object *arg1 = checkstring(first(args));
int len = stringlength(arg1) + 2; //make it longer for the initial slash and the null terminator int len = stringlength(arg1) + 2; //make it longer for the initial slash and the null terminator
sd_path_buf = (char*)malloc(len);
sd_path_buf = (char*)malloc(len);
if (sd_path_buf != NULL) { if (sd_path_buf != NULL) {
cstring(arg1, &sd_path_buf[1], len-1); cstring(arg1, &sd_path_buf[1], len-1);
sd_path_buf[0] = '/'; //really weird way to add a slash at the front... sd_path_buf[0] = '/'; //really weird way to add a slash at the front...