diff options
author | Jakob Kaivo <jkk@ung.org> | 2019-03-13 20:59:41 -0400 |
---|---|---|
committer | Jakob Kaivo <jkk@ung.org> | 2019-03-13 20:59:41 -0400 |
commit | 8ab5902d2cb66809d478ef795a878a413dea41cc (patch) | |
tree | a2d4f9cba84dbb481d4c988537f608c8e788f710 /var.c |
migrate to gitlab
Diffstat (limited to 'var.c')
-rw-r--r-- | var.c | 28 |
1 files changed, 28 insertions, 0 deletions
@@ -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; +} |