X-Git-Url: http://andersk.mit.edu/gitweb/splint.git/blobdiff_plain/885824d34f6f6626fde2fb041801408cbaf1f6f1..1ac6313d90a797f38280d75b2a63655579080ac6:/test/args.lcs diff --git a/test/args.lcs b/test/args.lcs index 8cb4c0d..46b12e3 100644 --- a/test/args.lcs +++ b/test/args.lcs @@ -14,18 +14,19 @@ %LCLsort double primitive nil nil %LCLSortTableEnd %LCLSymbolTable +%LCLop min :int, int -> int %LCLop max :int, int -> int %LCLop 0 : -> int %LCLop 0 : -> double %LCLop 1 : -> int %LCLop 1 : -> double -%LCLop __ < __ :int, int -> bool -%LCLop __ < __ :double, double -> bool %LCLop if __ then __ else __ :bool, bool, bool -> bool %LCLop if __ then __ else __ :bool, int, int -> int %LCLop if __ then __ else __ :bool, double, double -> double %LCLop if __ then __ else __ :bool, _char_Vec, _char_Vec -> _char_Vec %LCLop if __ then __ else __ :bool, char, char -> char +%LCLop __ < __ :int, int -> bool +%LCLop __ < __ :double, double -> bool %LCLop empty : -> _char_Vec %LCLop __ > __ :int, int -> bool %LCLop __ > __ :double, double -> bool @@ -38,8 +39,8 @@ %LCLop len :_char_Vec -> int %LCLop prefix :_char_Vec, int -> _char_Vec %LCLop __ / __ :double, double -> double -%LCLop removePrefix :_char_Vec, int -> _char_Vec %LCLop __ \implies __ :bool, bool -> bool +%LCLop removePrefix :_char_Vec, int -> _char_Vec %LCLop substring :_char_Vec, int, int -> _char_Vec %LCLop __ || __ :_char_Vec, _char_Vec -> _char_Vec %LCLop tail :_char_Vec -> _char_Vec @@ -76,11 +77,11 @@ %LCLop __ \neq __ :_char_Vec, _char_Vec -> bool %LCLop __ \neq __ :char, char -> bool %LCLop { __ } :char -> _char_Vec -%LCLop __ |- __ :_char_Vec, char -> _char_Vec %LCLop __ [] :__char_Obj_Ptr -> __char_Obj_Arr -%LCLop __ -| __ :char, _char_Vec -> _char_Vec +%LCLop __ |- __ :_char_Vec, char -> _char_Vec %LCLop __ [__] :_char_Vec, int -> char %LCLop __ [__] :__char_Obj_Arr, int -> _char_Obj +%LCLop __ -| __ :char, _char_Vec -> _char_Vec %LCLop __ \leq __ :int, int -> bool %LCLop __ \leq __ :double, double -> bool %LCLop __ \geq __ :int, int -> bool @@ -111,7 +112,6 @@ %LCLop abs :double -> double %LCLop div :int, int -> int %LCLop mod :int, int -> int -%LCLop min :int, int -> int %LCLtype float float exposed %LCLtype bool bool immutable %LCLconst FALSE bool