Movatterモバイル変換

[0]ホーム
URL:

Skip to content

Navigation Menu

Sign in
Appearance settings

Search code, repositories, users, issues, pull requests...

Provide feedback

We read every piece of feedback, and take your input very seriously.

Saved searches

Use saved searches to filter your results more quickly

 Sign up
Appearance settings

Commit47ce8af

Browse files
committed
2 parents1d59de8 +9893e72 commit47ce8af

34 files changed

+2392
-2229
lines changed

‎src/absil/ilascii.fs‎

Lines changed: 18 additions & 18 deletions
Original file line numberDiff line numberDiff line change
@@ -149,18 +149,18 @@ let wordsOfNoArgInstr, isNoArgInstr =
149149
lett=
150150
lazy
151151
(lett= HashMultiMap(300, HashIdentity.Structural)
152-
noArgInstrs|> Lazy.force|> List.iter(fun(x,mk)-> t.Add(mk,x));
152+
noArgInstrs|> Lazy.force|> List.iter(fun(x,mk)-> t.Add(mk,x));
153153
t)
154-
(fun s->(Lazy.force t).[s]),
154+
(fun s->(Lazy.force t).[s]),
155155
(fun s->(Lazy.force t).ContainsKey s)
156156
#endif
157157

158158
// --------------------------------------------------------------------
159159
// Instructions are preceded by prefixes, e.g. ".tail" etc.
160160
// --------------------------------------------------------------------
161161

162-
letmk_stind(nm,dt)=(nm,(fun()-> I_stind(Aligned,Nonvolatile,dt)))
163-
letmk_ldind(nm,dt)=(nm,(fun()-> I_ldind(Aligned,Nonvolatile,dt)))
162+
letmk_stind(nm,dt)=(nm,(fun()-> I_stind(Aligned,Nonvolatile,dt)))
163+
letmk_ldind(nm,dt)=(nm,(fun()-> I_ldind(Aligned,Nonvolatile,dt)))
164164

165165
// --------------------------------------------------------------------
166166
// Parsing only... Tables of different types of instructions.
@@ -192,7 +192,7 @@ type LazyInstrTable<'T> = Lazy<InstrTable<'T>>
192192
// --------------------------------------------------------------------
193193

194194
letNoArgInstrs=
195-
lazy(((noArgInstrs|> Lazy.force|> List.map(fun(nm,i)->(nm,(fun()-> i))))@
195+
lazy(((noArgInstrs|> Lazy.force|> List.map(fun(nm,i)->(nm,(fun()-> i))))@
196196
[(mk_stind(["stind";"u"], DT_I));
197197
(mk_stind(["stind";"i"], DT_I));
198198
(mk_stind(["stind";"u1"], DT_I1));(* ILX EQUIVALENT*)
@@ -218,8 +218,8 @@ let NoArgInstrs =
218218
(mk_ldind(["ldind";"r4"], DT_R4));
219219
(mk_ldind(["ldind";"r8"], DT_R8));
220220
(mk_ldind(["ldind";"ref"], DT_REF));
221-
(["cpblk"],(fun()-> I_cpblk(Aligned,Nonvolatile)));
222-
(["initblk"],(fun()-> I_initblk(Aligned,Nonvolatile)));
221+
(["cpblk"],(fun()-> I_cpblk(Aligned,Nonvolatile)));
222+
(["initblk"],(fun()-> I_initblk(Aligned,Nonvolatile)));
223223
]
224224
): NoArgInstr InstrTable);;
225225

@@ -231,14 +231,14 @@ let Int32Instrs =
231231
(["ldc";"i4";"s"],(fun x->((mkLdcInt32 x))));]: Int32Instr InstrTable)
232232

233233
letInt32Int32Instrs=
234-
lazy([(["ldlen";"multi"],(fun(x,y)-> EI_ldlen_multi(x, y)));]: Int32Int32Instr InstrTable)
234+
lazy([(["ldlen";"multi"],(fun(x,y)-> EI_ldlen_multi(x, y)));]: Int32Int32Instr InstrTable)
235235

236236
letDoubleInstrs=
237237
lazy([(["ldc";"r4"],(fun x->(AI_ldc(DT_R4, x))));
238238
(["ldc";"r8"],(fun x->(AI_ldc(DT_R8, x))));]: DoubleInstr InstrTable)
239239

240240
letMethodSpecInstrs=
241-
lazy([((["call"],(fun(mspec,y)-> I_call(Normalcall,mspec,y))))]: InstrTable<MethodSpecInstr>)
241+
lazy([((["call"],(fun(mspec,y)-> I_call(Normalcall,mspec,y))))]: InstrTable<MethodSpecInstr>)
242242

243243
letStringInstrs=
244244
lazy([(["ldstr"],(fun x-> I_ldstr x));]: InstrTable<StringInstr>)
@@ -248,27 +248,27 @@ let TokenInstrs =
248248

249249

250250
letTypeInstrs=
251-
lazy([(["ldelema"],(fun x-> I_ldelema(NormalAddress,false,ILArrayShape.SingleDimensional,x)));
252-
(["ldelem";"any"],(fun x-> I_ldelem_any(ILArrayShape.SingleDimensional,x)));
251+
lazy([(["ldelema"],(fun x-> I_ldelema(NormalAddress,false,ILArrayShape.SingleDimensional,x)));
252+
(["ldelem";"any"],(fun x-> I_ldelem_any(ILArrayShape.SingleDimensional,x)));
253253
(["stelem";"any"],(fun x-> I_stelem_any(ILArrayShape.SingleDimensional, x)));
254-
(["newarr"],(fun x-> I_newarr(ILArrayShape.SingleDimensional,x)));
254+
(["newarr"],(fun x-> I_newarr(ILArrayShape.SingleDimensional,x)));
255255
(["castclass"],(fun x-> I_castclass x));
256256
(["ilzero"],(fun x-> EI_ilzero x));
257257
(["isinst"],(fun x-> I_isinst x));
258258
(["initobj";"any"],(fun x-> I_initobj x));
259259
(["unbox";"any"],(fun x-> I_unbox_any x));]: InstrTable<TypeInstr>)
260260

261261
letIntTypeInstrs=
262-
lazy([(["ldelem";"multi"],(fun(x,y)->(I_ldelem_any(ILArrayShape.FromRank x,y))));
263-
(["stelem";"multi"],(fun(x,y)->(I_stelem_any(ILArrayShape.FromRank x,y))));
264-
(["newarr";"multi"],(fun(x,y)->(I_newarr(ILArrayShape.FromRank x,y))));
265-
(["ldelema";"multi"],(fun(x,y)->(I_ldelema(NormalAddress,false,ILArrayShape.FromRank x,y))));]: InstrTable<IntTypeInstr>)
262+
lazy([(["ldelem";"multi"],(fun(x,y)->(I_ldelem_any(ILArrayShape.FromRank x,y))));
263+
(["stelem";"multi"],(fun(x,y)->(I_stelem_any(ILArrayShape.FromRank x,y))));
264+
(["newarr";"multi"],(fun(x,y)->(I_newarr(ILArrayShape.FromRank x,y))));
265+
(["ldelema";"multi"],(fun(x,y)->(I_ldelema(NormalAddress,false,ILArrayShape.FromRank x,y))));]: InstrTable<IntTypeInstr>)
266266

267267
letValueTypeInstrs=
268268
lazy([(["cpobj"],(fun x-> I_cpobj x));
269269
(["initobj"],(fun x-> I_initobj x));
270-
(["ldobj"],(fun z-> I_ldobj(Aligned,Nonvolatile,z)));
271-
(["stobj"],(fun z-> I_stobj(Aligned,Nonvolatile,z)));
270+
(["ldobj"],(fun z-> I_ldobj(Aligned,Nonvolatile,z)));
271+
(["stobj"],(fun z-> I_stobj(Aligned,Nonvolatile,z)));
272272
(["sizeof"],(fun x-> I_sizeof x));
273273
(["box"],(fun x-> I_box x));
274274
(["unbox"],(fun x-> I_unbox x));]: InstrTable<ValueTypeInstr>)

‎src/absil/ilprint.fs‎

Lines changed: 5 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -271,11 +271,11 @@ and goutput_permission _env os p =
271271

272272
match pwith
273273
| PermissionSet(sa,b)->
274-
output_string os" .permissionset";
275-
output_security_action os sa;
276-
output_string os" = (";
277-
output_bytes os b;
278-
output_string os")";
274+
output_string os" .permissionset"
275+
output_security_action os sa
276+
output_string os" = ("
277+
output_bytes os b
278+
output_string os")"
279279

280280
andgoutput_security_decls env os(ps:ILPermissions)= output_seq""(goutput_permission env) os ps.AsList
281281

0 commit comments

Comments
 (0)
[8]ページ先頭
©2009-2025 Movatter.jp