コミット: ca3111a23e41e0fa23a25c3f0815705d0253c9e8 - sapphire_lisp (git)

Baremetal Lisp interpreter and compiler for low-resource devices

コミットメタ情報

• リビジョン: ca3111a23e41e0fa23a25c3f0815705d0253c9e8 (tree)
• 日時: 2020-09-10 05:20:44
• 作者: AlaskanEmily <emily@alas...>
• コミッター: AlaskanEmily

ログメッセージ

Fixes for compiling with clang

変更サマリ

• modified: makefile
• modified: sl_i.c
• modified: test_memcpy.c
• modified: test_sl_s_parse.c
• modified: yyy_test.h

差分

--- a/makefile
+++ b/makefile
@@ -4,7 +4,7 @@
 # Unix makefile.
 
 CC=cc
-CFLAGS=-g -Wall -Wextra -pedantic -Werror -ansi -Wshadow -Wno-old-style-declaration
+CFLAGS=-g -Wall -Wextra -pedantic -Werror -ansi -Wshadow -Wno-old-style-declaration -Wno-unknown-warning-option
 COMPILEFLAG=-c
 COUT=-o 
 

--- a/sl_i.c
+++ b/sl_i.c
@@ -866,7 +866,7 @@ SL_I_ALL_ARITHMETIC(SL_I_TEST_ARITHMETIC)
             
             /* = */
             if(SL_S_COMPARE_ATOMS(&sl_x_eq, atom)){
-                if(!SL_S_LengthCompare(list->tail, 2) == 0){
+                if(SL_S_LengthCompare(list->tail, 2) != 0){
                     rt->pending_error = "Invalid arith in =";
                     return SL_S_NIL;
                 }

--- a/test_memcpy.c
+++ b/test_memcpy.c
@@ -132,4 +132,4 @@ static int TestMemCpy(int seed){
         }
     }
     return SUCCESS_INDICATOR;
-}
\ No newline at end of file
+}

--- a/test_sl_s_parse.c
+++ b/test_sl_s_parse.c
@@ -626,7 +626,7 @@ static struct YYY_Test sl_s_parse_tests[] = {
 YYY_TEST_FUNCTION(ParseTest, sl_s_parse_tests, "ParseTest")
 
 int main(int argc, char *argv[]){
-    int ok, i, e;
+    int ok, i;
     struct YYY_Test *target;
     ok = 0;
     if(argc > 1){
@@ -638,7 +638,7 @@ int main(int argc, char *argv[]){
                 fputc('\n', stderr);
             }
             else{
-                YYY_RUN_TEST(*target, e, "ParseTest");
+                YYY_RUN_TEST(*target, ok, "ParseTest");
             }
         }
     }

--- a/yyy_test.h
+++ b/yyy_test.h
@@ -17,7 +17,7 @@ struct YYY_Test{
 };
 
 
-#if (defined __GNUC__)
+#if (defined __GNUC__) && !(defined __clang__)
 #define YYY_FUNC __builtin_FUNCTION()
 #else
 #define YYY_FUNC __FUNCTION__