remove extra files
This commit is contained in:
@@ -12,6 +12,13 @@ The format is based on [Keep a Changelog](https://keepachangelog.com/en/1.1.0/)
|
|||||||
- support for actually doing anything
|
- support for actually doing anything
|
||||||
- autogen code
|
- autogen code
|
||||||
|
|
||||||
|
## [0.1.0.2] -- 2025-12-11
|
||||||
|
|
||||||
|
### Removed
|
||||||
|
|
||||||
|
- `scripts`
|
||||||
|
- `lib/Main.hs`
|
||||||
|
|
||||||
## [0.1.0.1] -- 2025-12-11
|
## [0.1.0.1] -- 2025-12-11
|
||||||
|
|
||||||
- does removing wayland but leaving the API intact count as breaking?
|
- does removing wayland but leaving the API intact count as breaking?
|
||||||
|
|||||||
@@ -3,7 +3,7 @@ name: hs-rgfw
|
|||||||
-- PVP summary: +-+------- breaking API changes
|
-- PVP summary: +-+------- breaking API changes
|
||||||
-- | | +----- non-breaking API additions
|
-- | | +----- non-breaking API additions
|
||||||
-- | | | +--- code changes with no API change
|
-- | | | +--- code changes with no API change
|
||||||
version: 0.1.0.1
|
version: 0.1.0.2
|
||||||
-- A short (one-line) description of the package.
|
-- A short (one-line) description of the package.
|
||||||
-- synopsis:
|
-- synopsis:
|
||||||
-- A longer description of the package.
|
-- A longer description of the package.
|
||||||
|
|||||||
38
lib/Main.hs
38
lib/Main.hs
@@ -1,38 +0,0 @@
|
|||||||
{-# LANGUAGE CApiFFI #-}
|
|
||||||
|
|
||||||
module Main (main) where
|
|
||||||
|
|
||||||
import Data.Bits (shiftL, (.|.))
|
|
||||||
import Foreign
|
|
||||||
import Foreign.C.String
|
|
||||||
import Foreign.C.Types
|
|
||||||
|
|
||||||
import Lib
|
|
||||||
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
-- main
|
|
||||||
--------------------------------------------------------------------------------
|
|
||||||
|
|
||||||
main :: IO ()
|
|
||||||
main = do
|
|
||||||
window <- withCString "a window" (\name ->
|
|
||||||
rgfwCreateWindow
|
|
||||||
name
|
|
||||||
0
|
|
||||||
0
|
|
||||||
800
|
|
||||||
600
|
|
||||||
$ mkWindowFlags
|
|
||||||
[ WindowNoResize
|
|
||||||
, WindowOpenGL
|
|
||||||
, WindowFullscreen
|
|
||||||
]
|
|
||||||
)
|
|
||||||
let loop ctr = do
|
|
||||||
shouldClose <- rgfwWindowShouldClose window
|
|
||||||
if 0 /= shouldClose
|
|
||||||
then return shouldClose
|
|
||||||
else loop $ ctr + 1
|
|
||||||
exitCode <- loop 0
|
|
||||||
putStrLn $ show exitCode
|
|
||||||
return ()
|
|
||||||
@@ -1,13 +0,0 @@
|
|||||||
rm lib/xdg-shell.h
|
|
||||||
rm lib/xdg-shell.c
|
|
||||||
rm lib/xdg-decoration-unstable-v1.h
|
|
||||||
rm lib/xdg-toplevel-icon-v1.c
|
|
||||||
rm lib/xdg-toplevel-icon-v1.h
|
|
||||||
rm lib/xdg-decoration-unstable-v1.c
|
|
||||||
rm lib/relative-pointer-unstable-v1.h
|
|
||||||
rm lib/relative-pointer-unstable-v1.c
|
|
||||||
rm lib/pointer-constraints-unstable-v1.h
|
|
||||||
rm lib/pointer-constraints-unstable-v1.c
|
|
||||||
rm lib/xdg-output-unstable-v1.h
|
|
||||||
rm lib/xdg-output-unstable-v1.c
|
|
||||||
true
|
|
||||||
@@ -1,13 +0,0 @@
|
|||||||
wayland-scanner client-header /usr/share/wayland-protocols/stable/xdg-shell/xdg-shell.xml lib/xdg-shell.h
|
|
||||||
wayland-scanner public-code /usr/share/wayland-protocols/stable/xdg-shell/xdg-shell.xml lib/xdg-shell.c
|
|
||||||
wayland-scanner client-header /usr/share/wayland-protocols/unstable/xdg-decoration/xdg-decoration-unstable-v1.xml lib/xdg-decoration-unstable-v1.h
|
|
||||||
wayland-scanner public-code /usr/share/wayland-protocols/staging/xdg-toplevel-icon/xdg-toplevel-icon-v1.xml lib/xdg-toplevel-icon-v1.c
|
|
||||||
wayland-scanner client-header /usr/share/wayland-protocols/staging/xdg-toplevel-icon/xdg-toplevel-icon-v1.xml lib/xdg-toplevel-icon-v1.h
|
|
||||||
wayland-scanner public-code /usr/share/wayland-protocols/unstable/xdg-decoration/xdg-decoration-unstable-v1.xml lib/xdg-decoration-unstable-v1.c
|
|
||||||
wayland-scanner client-header /usr/share/wayland-protocols/unstable/relative-pointer/relative-pointer-unstable-v1.xml lib/relative-pointer-unstable-v1.h
|
|
||||||
wayland-scanner public-code /usr/share/wayland-protocols/unstable/relative-pointer/relative-pointer-unstable-v1.xml lib/relative-pointer-unstable-v1.c
|
|
||||||
wayland-scanner client-header /usr/share/wayland-protocols/unstable/pointer-constraints/pointer-constraints-unstable-v1.xml lib/pointer-constraints-unstable-v1.h
|
|
||||||
wayland-scanner public-code /usr/share/wayland-protocols/unstable/pointer-constraints/pointer-constraints-unstable-v1.xml lib/pointer-constraints-unstable-v1.c
|
|
||||||
wayland-scanner client-header /usr/share/wayland-protocols/unstable/xdg-output/xdg-output-unstable-v1.xml lib/xdg-output-unstable-v1.h
|
|
||||||
wayland-scanner public-code /usr/share/wayland-protocols/unstable/xdg-output/xdg-output-unstable-v1.xml lib/xdg-output-unstable-v1.c
|
|
||||||
true
|
|
||||||
Reference in New Issue
Block a user