Ngaro VM float opcodes

handler.go

	floatHandler := func(i *vm.Instance, opcode vm.Cell) error {
		switch opcode {
		case -vm.OpAdd:
			rhs := i.Pop()
			lhs := i.Tos()

			lhsf := (*float64)(unsafe.Pointer(&lhs))
			*lhsf += *(*float64)(unsafe.Pointer(&rhs))

			i.SetTos(lhs)
		case -vm.OpSub:
			rhs := i.Pop()
			lhs := i.Tos()

			lhsf := (*float64)(unsafe.Pointer(&lhs))
			*lhsf -= *(*float64)(unsafe.Pointer(&rhs))

			i.SetTos(lhs)
		case -vm.OpMul:
			rhs := i.Pop()
			lhs := i.Tos()

			lhsf := (*float64)(unsafe.Pointer(&lhs))
			*lhsf *= *(*float64)(unsafe.Pointer(&rhs))

			i.SetTos(lhs)
		case -vm.OpDimod:
			rhs := i.Pop()
			lhs := i.Tos()

			lhsf := (*float64)(unsafe.Pointer(&lhs))
			*lhsf /= *(*float64)(unsafe.Pointer(&rhs))

			i.SetTos(lhs)
		case -1: //ITOF
			arg := i.Tos()

			f := (*float64)(unsafe.Pointer(&arg))
			*f = float64(arg)

			i.SetTos(arg)
			fmt.Println("set tos to ", arg)
		case -2: //FTOI
			arg := i.Tos()

			f := *(*float64)(unsafe.Pointer(&arg))
			arg = vm.Cell(f)

			i.SetTos(arg)
		default:
			return errors.New("uknown custom opcode")

		}
		return nil
	}