aboutsummaryrefslogtreecommitdiff
path: root/code/main.felan
blob: d8c6ec32bb4c9b145138aafd26c5817c475f09f3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
@import("basic.felan");

libc :: @c_library("/lib/libc.so.6");
puts :: @c_function(libc,"puts",(*u8)->i32);
sleep :: @c_function(libc,"sleep",(i32)->i32);

raylib :: @c_library("/lib/libraylib.so.5.5.0");
InitWindow :: @c_function(raylib,"InitWindow",(i32,i32,*u8)->void);
WindowShouldClose :: @c_function(raylib,"WindowShouldClose",()->bool);
BeginDrawing :: @c_function(raylib,"BeginDrawing",()->void);
EndDrawing :: @c_function(raylib,"EndDrawing",()->void);
CloseWindow :: @c_function(raylib,"CloseWindow",()->void);
ClearBackground :: @c_function(raylib,"ClearBackground",(color:u32)->void);

main :: ()->void{
  b := "hello\0";
  str := &b[0];
  screenWidth :i32: 800;
  screenHeight :i32: 450;
  InitWindow(screenWidth,screenHeight,str);
  while WindowShouldClose() == false {
    BeginDrawing();
    ClearBackground(@cast(4294967295,u32));
    EndDrawing();
  }
  CloseWindow();
};