mirror of
https://codeberg.org/ProgramSnail/lang_2023.git
synced 2026-01-08 04:35:02 +00:00
example fixes
This commit is contained in:
parent
71c7d91e1a
commit
562541087e
13 changed files with 30 additions and 322 deletions
|
|
@ -5,14 +5,17 @@ typeclass (Ord : #Eq) =
|
|||
& is_less_then : Ord -> Bool
|
||||
|
||||
typeclass (D : #A #B #C) 'A 'B =
|
||||
& do_something : Unit -> (& 'A & 'B)
|
||||
& do_something : -> (& 'A & 'B)
|
||||
|
||||
typeclass E 'A =
|
||||
& do_something : Unit -> 'A
|
||||
& do_something : -> 'A
|
||||
|
||||
decl ( == ) ('A : #Ord) : 'A -> 'A -> Bool
|
||||
def ( == ) : a b = a.is_equal_to: b
|
||||
|
||||
decl ( != ) ('A : #Ord) : 'A -> 'A -> Bool
|
||||
def ( != ) : a b = not: (a == b)
|
||||
|
||||
decl ( < ) ('A : #Ord) : 'A -> 'A -> Bool
|
||||
def ( < ) : a b = a.is_less_then: b
|
||||
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue