/* The scully programming language. * * Copyright (c) Peter Dahlberg, Markus Hauschild and Florian Sattler, 2013. * Licensed under the GNU GPL v2. */ #include #include #include #include #include int put_char(int c) { printf("%c", c); return 0; } bool random_if(int p) { //srand(time(NULL)); int r = rand() % 100; return (r < p); } int time_seed() { srand(time(NULL)); return 0; }