Skip to content
Browse files

Build 9: M/Wire back-end JSON fix to cater for strings starting -0

  • Loading branch information...
1 parent a1f13e9 commit 86bc289e25c48b5d5d2d87c0b857bc3eea9654cd @robtweed committed Jun 14, 2011
Showing with 3 additions and 2 deletions.
  1. +3 −2 gtm/zmwire.m
View
5 gtm/zmwire.m
@@ -55,10 +55,10 @@
; Stop the Daemon process using ^RESJOB and restart it.
;
mwireVersion
- ;;Build 19
+ ;;Build 20
;
mwireDate
- ;;09 June 2011
+ ;;13 June 2011
;
version
;
@@ -1826,6 +1826,7 @@ s conv("F")=15
;
numeric(value)
i $e(value,1)=0,$l(value)>1 QUIT 0
+ i $e(value,1,2)="-0",$l(value)>2,$e(value,1,3)'="-0." QUIT 0
i value?1N.N QUIT 1
i value?1"-"1N.N QUIT 1
i value?1N.N1"."1N.N QUIT 1

0 comments on commit 86bc289

Please sign in to comment.
Something went wrong with that request. Please try again.