Compare commits

...

9 Commits

Author SHA1 Message Date
4dd1f2b5f1 Slightly broken. 2025-01-20 18:05:56 -05:00
1a2249a0da Fixed tests and Makefile for the last time. 2025-01-20 16:02:24 -05:00
3ab2696705 Updated dstr sz. 2025-01-18 11:14:14 -05:00
0293c925d2 Fixed dstr test. 2025-01-18 11:12:07 -05:00
16d62f280f Fix Makefile assuming dirs. 2025-01-18 11:10:50 -05:00
0dbeff7077 Fix Makefile assuming dirs. 2025-01-18 11:07:46 -05:00
96038f4baa Updated README. 2025-01-18 11:05:58 -05:00
6d7ff5d43f Updated README. 2025-01-18 11:05:15 -05:00
868ee84aeb Updated README. 2025-01-18 11:01:56 -05:00
8 changed files with 92 additions and 17 deletions

View File

@ -35,6 +35,7 @@ TEST_VAL_DIR = $(TEST_DIR)/validation
RESETCOLOR = \033[0m
WHITE = $(RESETCOLOR)\033[37m
WHITE_BOLD = $(RESETCOLOR)\033[37;1m
RED_BOLD = $(RESETCOLOR)\033[31;1m
all: $(TARGET)
@ -81,18 +82,20 @@ $(UNITY_OBJ): $(UNITY_C) $(UNITY_H)
# Compile test object.
$(TEST_OBJ_DIR)/test_%.o: $(TEST_DIR)/test_%.c
@ mkdir -p $(TEST_OBJ_DIR)
@ $(PRINT) "$(WHITE_BOLD)Compiling test object $(WHITE)$@$(WHITE_BOLD)...$(RESETCOLOR)"
$(CC) $(CFLAGS) -c $< -o $@
# Link final test binary.
$(TEST_BUILD_DIR)/test_%.out: $(TEST_OBJ_DIR)/test_%.o $(OBJ_DIR)/%.o $(UNITY_OBJ)
$(TEST_BUILD_DIR)/test_%.out: $(TEST_OBJ_DIR)/test_%.o $(OBJ_DIR)/grammar.o $(OBJ_FILES_NOMAIN) $(UNITY_OBJ)
@ mkdir -p $(TEST_BUILD_DIR)
@ $(PRINT) "$(WHITE_BOLD)Linking test binary $(WHITE)$@$(WHITE_BOLD)...$(RESETCOLOR)"
$(LINK) -o $@ $? $(LDFLAGS)
# Run the test files.
test: $(TARGET) $(TEST_BIN_FILES)
@ $(PRINT) "$(WHITE_BOLD)Running unit tests...$(RESETCOLOR)"
for test in $(TEST_BIN_FILES); do ./$${test}; done
for test in $(TEST_BIN_FILES); do ./$${test} || echo -e "$(RED_BOLD) BAD EXIT ON $${test} $(RESETCOLOR)"; done
@ $(PRINT) "$(WHITE_BOLD)Running validation tests...$(RESETCOLOR)"
$(BATS) $(TEST_VAL_DIR)

View File

@ -5,9 +5,18 @@ Version v1.0-alpha
## Usage
```bash
git clone https://git.signorovitch.org/jacob/scl && cd scl
make release # Build.
./scl # Run.
git clone https://git.signorovitch.org/jacob/scl -b stable
cd scl
make release
./scl.out
```
### For Development
```bash
git clone git@signorovitch.org:jacob/scl --recurse-submodules && cd scl
make all test
./scl.out
```
If you wish to run tests, make sure to run `git clone --recurse-submodules` to

6
src/global.c Normal file
View File

@ -0,0 +1,6 @@
#include "include/global.h"
#include <stdlib.h>
// Global input text.
char* inp = NULL;

View File

@ -3,7 +3,7 @@
#include <stdlib.h>
#define DSTR_INITSZ 2
#define DSTR_INITSZ 128
typedef struct {
char* buf; // The buffer containing the string.

4
src/include/global.h Normal file
View File

@ -0,0 +1,4 @@
#ifndef GLOBAL_H
#define GLOBAL_H
#endif

View File

@ -1,6 +1,7 @@
#include <stdio.h>
#include <string.h>
#include "include/global.h"
#include "include/ast.h"
#include "include/dstr.h"
#include "include/exec.h"
@ -11,10 +12,7 @@
// Global Abstract Syntax Tree.
extern AST* root;
// Global input text.
char* inp = NULL;
extern char* inp;
extern int yyparse();
int main(int argc, char** argv) {

56
test/test_ast.c Normal file
View File

@ -0,0 +1,56 @@
#include "../src/include/ast.h"
#include "Unity/src/unity.h"
#include "Unity/src/unity_internals.h"
#include <string.h>
void setUp() {}
void tearDown() {}
void test_ast_num() {
ASTNumData* num = ast_num_data_init(12.0);
AST* ast = ast_init(AST_TYPE_NUM, num);
TEST_ASSERT_EQUAL(AST_TYPE_NUM, ast->type);
TEST_ASSERT_EQUAL(12.0, *(ASTNumData*)ast->data);
ast_destroy(ast);
}
void test_ast_vref() {
char* s = malloc(2);
strcpy(s, "x");
ASTVrefData* vref = ast_vref_data_init(s);
AST* ast = ast_init(AST_TYPE_VREF, vref);
TEST_ASSERT_EQUAL(AST_TYPE_VREF, ast->type);
ASTVrefData data = *(ASTVrefData*)ast->data;
TEST_ASSERT_EQUAL_STRING("x", data.to);
//ast_destroy(ast);
}
void test_ast_call() {
AST** argv = malloc(2*sizeof(AST*));
argv[0] = ast_init(AST_TYPE_NUM, ast_num_data_init(1.0));
argv[1] = ast_init(AST_TYPE_NUM, ast_num_data_init(2.0));
ASTCallData* call = ast_call_data_init("f", 2, argv);
AST* ast = ast_init(AST_TYPE_CALL, call);
TEST_ASSERT_EQUAL(AST_TYPE_CALL, ast->type);
TEST_ASSERT_EQUAL("f", ((ASTCallData*)ast->data)->to);
TEST_ASSERT_EQUAL(2, ((ASTCallData*)ast->data)->argc);
TEST_ASSERT_EQUAL(1.0, ((ASTCallData*)ast->data)->argv[0]);
TEST_ASSERT_EQUAL(2.0, ((ASTCallData*)ast->data)->argv[1]);
ast_destroy(ast);
}
int main() {
UNITY_BEGIN();
RUN_TEST(test_ast_num);
RUN_TEST(test_ast_vref);
RUN_TEST(test_ast_call);
return UNITY_END();
}

View File

@ -9,7 +9,7 @@ void test_dstr_init() {
Dstr* dstr = dstr_init();
TEST_ASSERT_EQUAL(0, strlen(dstr->buf));
TEST_ASSERT_EQUAL(0, dstr->ln);
TEST_ASSERT_EQUAL(DSTR_INITSZ, dstr->bufsz);
TEST_ASSERT_EQUAL(DSTR_INITSZ, dstr->sz);
}
void test_dstr_append() {
@ -22,7 +22,7 @@ void test_dstr_append() {
TEST_ASSERT_EQUAL_STRING(hello_world, dstr->buf);
TEST_ASSERT_EQUAL(strlen(hello_world), dstr->ln);
TEST_ASSERT_EQUAL(DSTR_INITSZ, dstr->bufsz);
TEST_ASSERT_EQUAL(DSTR_INITSZ, dstr->sz);
dstr_destroy(dstr);
@ -36,7 +36,7 @@ void test_dstr_append() {
TEST_ASSERT_EQUAL_STRING(h, dstr->buf);
TEST_ASSERT_EQUAL(strlen(h), dstr->ln);
TEST_ASSERT_EQUAL(DSTR_INITSZ * 2, dstr->bufsz);
TEST_ASSERT_EQUAL(DSTR_INITSZ * 2, dstr->sz);
}
void test_dstr_appendch() {
@ -50,7 +50,7 @@ void test_dstr_appendch() {
TEST_ASSERT_EQUAL_STRING(c_str, dstr->buf);
TEST_ASSERT_EQUAL(strlen(c_str), dstr->ln);
TEST_ASSERT_EQUAL(DSTR_INITSZ, dstr->bufsz);
TEST_ASSERT_EQUAL(DSTR_INITSZ, dstr->sz);
dstr_destroy(dstr);
@ -66,11 +66,10 @@ void test_dstr_appendch() {
TEST_ASSERT_EQUAL_STRING(h, dstr->buf);
TEST_ASSERT_EQUAL(strlen(h), dstr->ln);
TEST_ASSERT_EQUAL(DSTR_INITSZ * 2, dstr->bufsz);
TEST_ASSERT_EQUAL(DSTR_INITSZ * 2, dstr->sz);
}
// not needed when using generate_test_runner.rb
int main(void) {
int main() {
UNITY_BEGIN();
RUN_TEST(test_dstr_init);
RUN_TEST(test_dstr_append);