diff options
Diffstat (limited to 'lc/Builtins.lc')
-rw-r--r-- | lc/Builtins.lc | 18 |
1 files changed, 0 insertions, 18 deletions
diff --git a/lc/Builtins.lc b/lc/Builtins.lc index 1d10d532..47dfc4e1 100644 --- a/lc/Builtins.lc +++ b/lc/Builtins.lc | |||
@@ -109,24 +109,6 @@ class Signed a | |||
109 | instance Signed Int | 109 | instance Signed Int |
110 | instance Signed Float | 110 | instance Signed Float |
111 | 111 | ||
112 | class Num a where | ||
113 | fromInt :: Int -> a | ||
114 | compare :: a -> a -> Ordering | ||
115 | negate :: a -> a | ||
116 | |||
117 | instance Num Int where | ||
118 | fromInt = id | ||
119 | compare = primCompareInt | ||
120 | negate = primNegateInt | ||
121 | instance Num Word where | ||
122 | fromInt = primIntToWord | ||
123 | compare = primCompareWord | ||
124 | negate = primNegateWord | ||
125 | instance Num Float where | ||
126 | fromInt = primIntToFloat | ||
127 | compare = primCompareFloat | ||
128 | negate = primNegateFloat | ||
129 | |||
130 | class Component a where | 112 | class Component a where |
131 | vec2 :: a -> a -> Vec 2 a | 113 | vec2 :: a -> a -> Vec 2 a |
132 | vec3 :: a -> a -> a -> Vec 3 a | 114 | vec3 :: a -> a -> a -> Vec 3 a |