From 8ab5902d2cb66809d478ef795a878a413dea41cc Mon Sep 17 00:00:00 2001 From: Jakob Kaivo Date: Wed, 13 Mar 2019 20:59:41 -0400 Subject: migrate to gitlab --- var.c | 28 ++++++++++++++++++++++++++++ 1 file changed, 28 insertions(+) create mode 100644 var.c (limited to 'var.c') diff --git a/var.c b/var.c new file mode 100644 index 0000000..f53d5fe --- /dev/null +++ b/var.c @@ -0,0 +1,28 @@ +#include "bc.h" + +bc_num *bc_let(char letter) +{ + static bc_num variables[26] = {0}; + static bc_num scale; + static bc_num ibase; + static bc_num obase; + + if (letter == 'S') { + return &scale; + } + + if (letter == 'I') { + return &ibase; + } + + if (letter == 'O') { + return &obase; + } + + return variables + (letter - 'a'); +} + +bc_num *bc_arr(char c, bc_num *a) +{ + return a; +} -- cgit v1.2.1