[Lexer] Store raw 0b supermagically

Author: PeyTy

source/compiler/lexer.hexa

@@ -457,7 +457,7 @@ class Lexer {
 						}
 					}
 
-					let string = parseInt(bytes.toString('ascii', position + 2, p), 2).toString()
+					let string = bytes.toString('ascii', position, p)
 					addMeta(Token.Integer, string, m)
 					position = p + offset
 

source/compiler/parser.hexa

@@ -795,7 +795,8 @@ class Parser {
 				// TODO rename `Default` token to `Empty`
 				case Default:
 					let at = i
-					let v = parseInt(value)
+					// TODO encode 0b flag into Meta
+					let v = value.startsWith('0b') ? parseInt(value.substr(2), 2) : parseInt(value)
 					if v > 2147483647 || v < -2147483647 {
 						i = at - 1
 						fail('Integer `\(value)` is too large for *signed* 32 bit, use `\(value)u32` or `\(value)n`')

source/data/token.hexa

@@ -217,11 +217,11 @@ enum Token : Int {
 					return '"string"'
 				}
 
-				if meta == Meta.SingleQuote {
-					return "'\(param)'"
+				if meta == Meta.DoubleQuote {
+					return '"\(param)"'
 				}
 
-				return '"\(param)"'
+				return "'\(param)'"
 
 			case Backtick: return (param == null)? '`backtick`' : '`\(param)`'
 			case Identifier: return (param == null)? 'identifier' : param