Омогућено читање библиотеке из DESTDIR

Makefile

@@ -8,7 +8,7 @@ PREFIX = /usr/local
 LIBPREFIX = $(PREFIX)/lib
 
 # флегови за C компајлер и линкер
-CPPFLAGS = -D_POSIX_C_SOURCE=200200L
+CPPFLAGS = -D_POSIX_C_SOURCE=200200L -DDESTDIR=\"$(DESTDIR)\"
 # CFLAGS = -g -std=c99 -pedantic -Wall -O0
 CFLAGS  = -std=c99 -pedantic -Wall -O3
 LDFLAGS = -lm -lc

cirilisp.c

@@ -61,7 +61,7 @@ void init()
 	addSymbolInternal("конс", &consInt, 0);
 	addSymbolInternal("јед?", &eqvQInt, 0);
 
-	if (!load("/usr/local/lib/cirilisp/инит.ћ"))
+	if (!load(DESTDIR"/usr/local/lib/cirilisp/инит.ћ"))
 	{
 		fprintf(stderr, "Није пронађена стандардна ЋИРЛИСП библиотека\
 \nПрограм се није могао правилно покренути\n");

internals.c

@@ -568,8 +568,8 @@ object eqvQInt(object parameters)
 				STR(CAR(CDR(parameters))));
 			break;
 		case charObject:
-			BOOL(result) = CHAR(CAR(parameters)) ==
-				CHAR(CAR(CDR(parameters)));
+			BOOL(result) = CHR(CAR(parameters)) ==
+				CHR(CAR(CDR(parameters)));
 			break;
 		case consObject:
 		case procedureObject: