File tree Expand file tree Collapse file tree 2 files changed +19
-1
lines changed
tests/regression/73-strings Expand file tree Collapse file tree 2 files changed +19
-1
lines changed Original file line number Diff line number Diff line change @@ -2434,7 +2434,7 @@ struct
24342434 | Addr. Addr (v , o ) -> Addr. Addr (v, lo o)
24352435 | other -> other in
24362436 AD. map rmLastOffset a
2437- | _ -> raise ( Failure " String function: not an address " )
2437+ | _ -> AD. top ( )
24382438 in
24392439 let string_manipulation s1 s2 lv all op_addr op_array =
24402440 let s1_v = eval_rv ~man st s1 in
Original file line number Diff line number Diff line change 1+ // NOCRASH
2+ extern int strcmp (const char * , const char * );
3+
4+ static int hello_read (const char * path ) {
5+ return strcmp (path , "Hello" );
6+ }
7+
8+ static const struct ops {
9+ int (* read )(const char * );
10+ } hello_oper = {
11+ .read = hello_read ,
12+ };
13+
14+ extern int main_real (const struct ops * );
15+
16+ int main () {
17+ return main_real (& hello_oper );
18+ }
You can’t perform that action at this time.
0 commit comments