Add support for hex literals

ast/node_builder.go

@@ -18,6 +18,7 @@
 
 import (
 	"fmt"
+	"math"
 	"regexp"
 	"strconv"
 	"strings"
@@ -39,6 +40,7 @@
 	stringType  *BTypeImpl
 	floatType   *BTypeImpl
 	decimalType *BTypeImpl
+	byteType    *BTypeImpl
 }
 
 func newTypeTable() typeTable {
@@ -49,6 +51,7 @@
 		stringType:  &BTypeImpl{tag: model.TypeTags_STRING, flags: Flags_READONLY},
 		floatType:   &BTypeImpl{tag: model.TypeTags_FLOAT, flags: Flags_READONLY},
 		decimalType: &BTypeImpl{tag: model.TypeTags_DECIMAL, flags: Flags_READONLY},
+		byteType:    &BTypeImpl{tag: model.TypeTags_BYTE, flags: Flags_READONLY},
 	}
 }
 
@@ -66,6 +69,8 @@
 		return t.floatType
 	case model.TypeTags_DECIMAL:
 		return t.decimalType
+	case model.TypeTags_BYTE:
+		return t.byteType
 	default:
 		panic("not implemented")
 	}
@@ -935,7 +940,14 @@
 func parseLong(originalNodeValue, processedNodeValue string, radix int) any {
 	val, err := strconv.ParseInt(processedNodeValue, radix, 64)
 	if err != nil {
-		panic("Unimplemented")
+		fVal, fErr := strconv.ParseFloat(processedNodeValue, 64)
+		if fErr != nil {
+			panic("Unimplemented")
+		}
+		if math.IsInf(fVal, 0) {
+			return originalNodeValue
+		}
+		return fVal
 	}
 	return val
 }

ast/types.go

@@ -48,7 +48,7 @@
 type BType interface {
 	model.Type
 	BTypeGetTag() model.TypeTags
-	bTypeSetTag(tag model.TypeTags)
+	BTypeSetTag(tag model.TypeTags)
 	bTypeGetName() model.Name
 	bTypeSetName(name model.Name)
 	bTypeGetFlags() uint64
@@ -290,7 +290,7 @@
 	return model.TypeKind_OBJECT
 }
 
-func (this *BLangTypeBase) bTypeSetTag(tag model.TypeTags) {
+func (this *BLangTypeBase) BTypeSetTag(tag model.TypeTags) {
 	this.tags = tag
 }
 
@@ -318,7 +318,7 @@
 	return this.tag
 }
 
-func (this *BTypeImpl) bTypeSetTag(tag model.TypeTags) {
+func (this *BTypeImpl) BTypeSetTag(tag model.TypeTags) {
 	this.tag = tag
 }