отладил модуль математики, обновил дампы, более простая система имен.

fw.go

@@ -33,7 +33,7 @@ func close() {
 func main() {
 	flag.Parse()
 	if name == "" {
-		name = "XevInit"
+		name = "Start"
 		utils.Debug(false)
 	}
 	global := &stdDomain{god: true}

fw_test_all.bat

@@ -23,5 +23,5 @@ start fw_test XevDemo20
 start fw_test XevDemo21
 start fw_test XevDemo22
 
-start fw_test XevTest0
-start fw_test XevInit
+start fw_test TestA0
+start fw_test Start

rt2/rules/call.go

@@ -15,10 +15,10 @@ import (
 	"fw/rt2/scope"
 	"fw/utils"
 	"math"
-	"math/big"
 	"reflect"
 	"ypk/assert"
 	"ypk/halt"
+	"ypk/mathe"
 )
 
 /**
@@ -138,15 +138,12 @@ func go_math(f frame.Frame, par node.Node) (seq frame.Sequence, ret frame.WAIT)
 		case LN:
 			res = math.Log(rv[1])
 		case MANT:
-			_ = big.NewRat(1, 1).SetFloat64(rv[1])
-			panic(0)
+			res, _ = mathe.Me(rv[1])
 		case EXP:
-			me(rv[1])
-			panic(0)
+			_, res = mathe.Me(rv[1])
 		default:
 			halt.As(100, rv[0])
 		}
-		fmt.Println(rv)
 	default:
 		halt.As(100, reflect.TypeOf(p))
 	}

rt2/scope/modern/val.go

@@ -782,6 +782,13 @@ func (o *ops) Sub(a, b scope.Value) scope.Value {
 				default:
 					panic(fmt.Sprintln(reflect.TypeOf(y)))
 				}
+			case REAL:
+				switch y := b.(type) {
+				case REAL:
+					return REAL(x - y)
+				default:
+					panic(fmt.Sprintln(reflect.TypeOf(y)))
+				}
 			case LONGINT:
 				switch y := b.(type) {
 				case LONGINT:
@@ -1274,6 +1281,8 @@ func (o *ops) Conv(a scope.Value, typ object.Type, comp ...object.ComplexType) s
 			return o.Conv(vfrom(x), typ)
 		case LONGINT:
 			return CHAR(rune(x))
+		case INTEGER:
+			return CHAR(rune(x))
 		default:
 			halt.As(100, reflect.TypeOf(x))
 		}
@@ -1441,6 +1450,13 @@ func (o *ops) Neq(a, b scope.Value) scope.Value {
 				default:
 					panic(fmt.Sprintln(reflect.TypeOf(y)))
 				}
+			case REAL:
+				switch y := b.(type) {
+				case REAL:
+					return BOOLEAN(x != y)
+				default:
+					panic(fmt.Sprintln(reflect.TypeOf(y)))
+				}
 			case LONGINT:
 				switch y := b.(type) {
 				case LONGINT:
@@ -1494,6 +1510,13 @@ func (o *ops) Lss(a, b scope.Value) scope.Value {
 				default:
 					panic(fmt.Sprintln(reflect.TypeOf(y)))
 				}
+			case REAL:
+				switch y := b.(type) {
+				case REAL:
+					return BOOLEAN(x < y)
+				default:
+					panic(fmt.Sprintln(reflect.TypeOf(y)))
+				}
 			case LONGINT:
 				switch y := b.(type) {
 				case LONGINT:
@@ -1598,6 +1621,13 @@ func (o *ops) Geq(a, b scope.Value) scope.Value {
 				default:
 					panic(fmt.Sprintln(reflect.TypeOf(y)))
 				}
+			case REAL:
+				switch y := b.(type) {
+				case REAL:
+					return BOOLEAN(x >= y)
+				default:
+					panic(fmt.Sprintln(reflect.TypeOf(y)))
+				}
 			default:
 				panic(fmt.Sprintln(reflect.TypeOf(x)))
 			}

xev/cmds.go

@@ -2,6 +2,7 @@ package xev
 
 import (
 	"archive/zip"
+	"fmt"
 	"fw/cp/module"
 	"io"
 	"path/filepath"
@@ -11,7 +12,7 @@ import (
 const CODE = "code"
 
 func Load(path, name string) (ret *module.Module) {
-	//fmt.Println(path + ` ` + name)
+	fmt.Println(path + ` ` + name)
 	//var data []byte
 	var rd io.Reader
 	r, err := zip.OpenReader(filepath.Join(path, CODE, name))