pull/1/head
Ondřej Hruška 10 years ago
parent a18e9d38a1
commit 90042d221d
  1. 3
      devel/lib/loops.h
  2. 29
      devel/lib/yeolde.h
  3. 10
      devel/lib_tests/test_loops_visual.c
  4. 34
      devel/lib_tests/test_yeolde.c
  5. BIN
      devel/lib_tests/x

@ -20,6 +20,3 @@
// Do until condition is met
#define until(what) while(!(what))
// Because why the hell not
#define whilst(what) while((what))

@ -0,0 +1,29 @@
#pragma once
/**
Ye Olde Control Structures
*/
#include "loops.h"
#define whilst(what) while((what))
#define when(what) if((what))
#define otherwise else
#define commence {
#define then {
#define cease }
#define choose(what) switch((what))
#define option case
#define shatter break
#define replay continue
#define equals ==
#define is ==
#define be =
#define over >
#define above >
#define under <
#define below <
#define let /**/
#define raise(what) (what)++
#define number int

@ -12,15 +12,15 @@ void main()
printf("\n");
int i = 0;
until (i == 100) i++;
whilst (i > 0) {
until (i == 0) {
i--;
printf("i = %d\n", i);
}
printf("\n");
loop(moo, 7) {
printf("moo = %d\n", moo);
}
}
}

@ -0,0 +1,34 @@
#include <stdio.h>
#include <stdlib.h>
#include <stdint.h>
#include <assert.h>
#include "lib/loops.h"
#include "lib/yeolde.h"
void main()
commence
let number a be 0;
whilst (a under 13)
commence
raise (a);
when (a is 5)
then
printf("A is ugly 5\n");
replay;
cease;
choose (a)
commence
option 1:
printf("A is 1\n");
shatter;
option 2:
printf("A is 2\n");
shatter;
option 3:
printf("Neither 1 nor 2\n");
cease;
cease;
cease

Binary file not shown.
Loading…
Cancel
Save