besc: go get before build

Author: udhos

basc/main.go

@@ -20,7 +20,7 @@ func main() {
 
 	var baslibModule string
 	var baslibImport string
-	var getFlags string
+	getFlags := "-d"
 	var basgoBuildCommand string
 	var output string
 
@@ -220,7 +220,7 @@ func buildGo(dir, baslibModule string, getFlags []string, output string) error {
 	}
 
 	//
-	// go get baslibModule
+	// go get -d baslibModule
 	//
 
 	args := []string{"get"}
@@ -235,6 +235,19 @@ func buildGo(dir, baslibModule string, getFlags []string, output string) error {
 		return errGet
 	}
 
+	//
+	// go get
+	//
+
+	args = []string{"get"}
+	cmdGet = exec.Command("go", args...)
+	cmdGet.Stdin = os.Stdin
+	cmdGet.Stdout = os.Stdout
+	cmdGet.Stderr = os.Stderr
+	if errGet := cmdGet.Run(); errGet != nil {
+		return errGet
+	}
+
 	//
 	// go build
 	//

examples/bench.bas

@@ -0,0 +1,14 @@
+5 screen 0
+10 FOR A=1 TO 10
+20 T1=TIMER
+30 FOR YD=1 TO 23:FOR XD=1 TO 80:LOCATE YD,XD:?CHR$(asc("0")+A);:NEXT:NEXT
+40 T2=TIMER
+50 T(A)=T2-T1
+60 NEXT:?"Average="(T(1)+T(2)+T(3)+T(4)+T(5)+T(6)+T(7)+T(8)+T(9)+T(10))/10
+1000 print "hit q to exit"
+1010 i$=input$(1)
+1020 while i$<>"q"
+1030 print "key:";i$;" asc:";asc(i$)
+1040 print "hit q to exit"
+1050 i$=input$(1)
+1060 wend