Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Support
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
C
clean-platform
Project overview
Project overview
Details
Activity
Releases
Cycle Analytics
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Charts
Issues
16
Issues
16
List
Boards
Labels
Milestones
Merge Requests
1
Merge Requests
1
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Charts
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Charts
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
clean-and-itasks
clean-platform
Compare Revisions
master...40-cross-platform-select-like-function
Source
40-cross-platform-select-like-function
Select Git revision
...
Target
master
Select Git revision
Compare
Commits (1)
initial throw
· 24b4bd61
Mart Lubbers
authored
Jul 24, 2019
24b4bd61
Hide whitespace changes
Inline
Side-by-side
Showing
4 changed files
with
20 additions
and
0 deletions
+20
-0
src/libraries/OS-Independent/System/Select.dcl
src/libraries/OS-Independent/System/Select.dcl
+13
-0
src/libraries/OS-Independent/System/Select.icl
src/libraries/OS-Independent/System/Select.icl
+1
-0
src/libraries/OS-Posix/System/_Select.dcl
src/libraries/OS-Posix/System/_Select.dcl
+3
-0
src/libraries/OS-Posix/System/_Select.icl
src/libraries/OS-Posix/System/_Select.icl
+3
-0
No files found.
src/libraries/OS-Independent/System/Select.dcl
0 → 100644
View file @
24b4bd61
definition
module
System
.
Select
from
Data
.
Error
import
::
MaybeError
from
System
.
OSError
import
::
MaybeOSError
,
::
OSError
,
::
OSErrorMessage
,
::
OSErrorCode
from
System
.
_Select
import
::
SelectSet
class
Selectable
s
where
toSelectSet
::
!*
s
!*
World
->
(!*
MaybeOSError
*(
SelectSet
*
s
),
!*
World
)
::
SelectPair
a
b
=
SelectPair
a
b
instance
Selectable
(
SelectPair
a
b
)
|
Selectable
a
&
Selectable
b
waitForSelectSet
::
!*(
SelectSet
s
)
->
!*(
SelectSet
src/libraries/OS-Independent/System/Select.icl
0 → 100644
View file @
24b4bd61
implementation
module
System
.
Select
src/libraries/OS-Posix/System/_Select.dcl
0 → 100644
View file @
24b4bd61
definition
module
System
.
_Select
::
SelectSet
(:==
{#
Int
})
src/libraries/OS-Posix/System/_Select.icl
0 → 100644
View file @
24b4bd61
implementation
module
System
.
_Select
::
SelectSet
:==
{#
Int
}