make better comments

1 files changed, 3 insertions, 1 deletions

diff --git a/liblali.c b/liblali.c
index 54c4bfd..e8bf1cc 100644
--- a/liblali.c
+++ b/liblali.c
@@ -1174,6 +1174,7 @@ Object *primitiveJoin(Object **args, GC_PARAM) {
   strcpy(result, list->car->string);
   char noPrefixNumber[2];
 
+  // the return of number
   if (resType == TYPE_NUMBER) {
     Object *lcar = nil;
     list = list->cdr;
@@ -1197,10 +1198,11 @@ Object *primitiveJoin(Object **args, GC_PARAM) {
     return newNumber(result, GC_ROOTS);
   }
 
+  // continue with copying to result string
   for (; list->cdr != nil; list = list->cdr)
     strcat(result, list->cdr->car->string);
 
-  // the return
+  // continue with return
   if (resType == TYPE_STRING)
     return newString(result, GC_ROOTS);
   else if (resType == TYPE_SYMBOL)