Commit 39b5c1cb authored by Austin Seipp's avatar Austin Seipp

rts: add Emacs 'Local Variables' to every .c file

This will hopefully help ensure some basic consistency in the forward by
overriding buffer variables. In particular, it sets the wrap length, the
offset to 4, and turns off tabs.
Signed-off-by: default avatarAustin Seipp <austin@well-typed.com>
parent 952f622c
......@@ -1321,3 +1321,11 @@ freeHaskellFunctionPtr(void* ptr)
}
#endif // !USE_LIBFFI_FOR_ADJUSTORS
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -24,3 +24,11 @@ extern RTS_PRIVATE StgFun *stg_stack_save_entries[];
#endif
#endif /* APPLY_H */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -117,3 +117,11 @@ arenaBlocks( void )
{
return arena_blocks;
}
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -23,3 +23,11 @@ RTS_PRIVATE void arenaFree ( Arena * );
RTS_PRIVATE unsigned long arenaBlocks( void );
#endif /* ARENA_H */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -89,3 +89,11 @@
#endif /* APPLY_H */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -22,3 +22,11 @@ RTS_PRIVATE void awaitEvent(rtsBool wait); /* In posix/Select.c or
#endif
#endif /* AWAITEVENT_H */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -8,3 +8,11 @@
#if defined(HAS_VISIBILITY_HIDDEN) && !defined(freebsd_HOST_OS)
#pragma GCC visibility push(hidden)
#endif
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -1075,3 +1075,11 @@ rtsBool checkSparkCountInvariant (void)
}
#endif
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -426,3 +426,11 @@ INLINE_HEADER rtsBool emptyInbox(Capability *cap)
#include "EndPrivate.h"
#endif /* CAPABILITY_H */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -318,3 +318,11 @@ void checkUnload (StgClosure *static_objects)
freeHashTable(addrs, NULL);
}
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -18,3 +18,11 @@ void checkUnload (StgClosure *static_objects);
#include "EndPrivate.h"
#endif // CHECKUNLOAD_H
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -91,3 +91,11 @@ StgWord16 closure_flags[] = {
#if N_CLOSURE_TYPES != 65
#error Closure types changed: update ClosureFlags.c!
#endif
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -316,3 +316,11 @@ void disassemble( StgBCO *bco )
}
#endif /* DEBUG */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -17,3 +17,11 @@ RTS_PRIVATE void disassemble( StgBCO *bco );
#endif
#endif /* DISASSEMBLER_H */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
#if defined(HAS_VISIBILITY_HIDDEN) && !defined(freebsd_HOST_OS)
#pragma GCC visibility pop
#endif
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -143,3 +143,11 @@ unlockFile(int fd)
RELEASE_LOCK(&file_lock_mutex);
return 0;
}
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -13,3 +13,11 @@ RTS_PRIVATE void initFileLocking(void);
RTS_PRIVATE void freeFileLocking(void);
#endif /* POSIX_FILELOCK_H */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -21,3 +21,11 @@ void freeProgEnvv (int envc, char *envv[]);
#include "EndPrivate.h"
#endif /* GETENV_H */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -29,3 +29,11 @@ W_ getPageFaults (void);
#include "EndPrivate.h"
#endif /* GETTIME_H */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -140,3 +140,11 @@ getOrSetLibHSghcFastStringTable(StgStablePtr ptr)
{
return getOrSetKey(LibHSghcFastStringTable,ptr);
}
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -16,3 +16,11 @@ RTS_PRIVATE void initGlobalStore(void);
RTS_PRIVATE void exitGlobalStore(void);
#endif
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -397,3 +397,11 @@ int keyCountHashTable (HashTable *table)
{
return table->kcount;
}
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -52,3 +52,11 @@ void exitHashTable ( void );
#include "EndPrivate.h"
#endif /* HASH_H */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -404,3 +404,11 @@ exitHpc(void) {
HpcModuleInfo *hs_hpc_rootModule(void) {
return modules;
}
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -66,3 +66,11 @@ hs_thread_done(void)
{
freeMyTask();
}
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -7,3 +7,11 @@
#include "Schedule.h"
#include "Capability.h"
#include "WSDeque.h"
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -1516,3 +1516,11 @@ run_BCO:
barf("interpretBCO: fell off end of the interpreter");
}
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -12,3 +12,11 @@
RTS_PRIVATE Capability *interpretBCO (Capability* cap);
#endif /* INTERPRETER_H */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -249,3 +249,11 @@ LdvCensusKillAll( void )
}
#endif /* PROFILING */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -39,3 +39,11 @@ RTS_PRIVATE void LdvCensusKillAll ( void );
#endif /* PROFILING */
#endif /* LDVPROFILE_H */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -7163,3 +7163,11 @@ machoGetMisalignment( FILE * f )
#endif
#endif
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -149,3 +149,11 @@ void exitLinker( void );
void freeObjectCode (ObjectCode *oc);
#endif /* LINKERINTERNALS_H */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -344,3 +344,11 @@ loop:
return NULL; // not blocked
}
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -28,3 +28,11 @@ doneWithMsgThrowTo (MessageThrowTo *m)
}
#include "EndPrivate.h"
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -53,3 +53,11 @@ void arm_atomic_spin_unlock()
#endif /* arm_HOST_ARCH && defined(arm_HOST_ARCH_PRE_ARMv6) */
#endif /* defined(THREADED_RTS) */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -394,3 +394,11 @@ papi_thread_stop_gc1_count(int event_set)
}
#endif /* USE_PAPI */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -34,3 +34,11 @@ void papi_thread_stop_gc1_count(int event_set);
#include "EndPrivate.h"
#endif /* PAPI_H */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -40,3 +40,11 @@
#endif
#endif /* POSIXSOURCE_H */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -144,3 +144,11 @@ PRELUDE_INFO(base_GHCziStable_StablePtr_con_info);
#define StablePtr_con_info DLL_IMPORT_DATA_REF(base_GHCziStable_StablePtr_con_info)
#endif /* PRELUDE_H */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -1170,3 +1170,11 @@ info_hdr_type(StgClosure *closure, char *res){
strcpy(res,closure_type_names[get_itbl(closure)->type]);
}
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -39,3 +39,11 @@ extern char *what_next_strs[];
#endif /* PRINTER_H */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -1148,3 +1148,11 @@ void heapCensus (Time t)
#endif
}
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -19,3 +19,11 @@ rtsBool strMatchesSelector (char* str, char* sel);
#include "EndPrivate.h"
#endif /* PROFHEAP_H */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -1145,3 +1145,11 @@ debugCCS( CostCentreStack *ccs )
#endif /* DEBUG */
#endif /* PROFILING */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -46,3 +46,11 @@ void debugCCS( CostCentreStack *ccs );
#include "EndPrivate.h"
#endif /* PROFILING_H */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -89,3 +89,11 @@ handleProfTick(void)
}
}
}
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -22,3 +22,11 @@ extern rtsBool performHeapProfile;
#include "EndPrivate.h"
#endif /* PROFTIMER_H */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -1051,3 +1051,11 @@ done:
}
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -74,3 +74,11 @@ interruptible(StgTSO *t)
#endif /* RAISEASYNC_H */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -2286,3 +2286,11 @@ belongToHeap(StgPtr p)
#endif /* DEBUG_RETAINER */
#endif /* PROFILING */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -51,3 +51,11 @@ extern W_ retainerStackBlocks ( void );
#endif /* PROFILING */
#endif /* RETAINERPROFILE_H */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -491,3 +491,11 @@ outputAllRetainerSet(FILE *prof_file)
#endif /* SECOND_APPROACH */
#endif /* PROFILING */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -203,3 +203,11 @@ void printRetainer(FILE *, retainer);
#endif /* PROFILING */
#endif /* RETAINERSET_H */
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -620,3 +620,11 @@ void rts_done (void)
freeMyTask();
}
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -41,3 +41,11 @@ DllMain ( HINSTANCE hInstance STG_UNUSED
}
#endif
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -13,3 +13,11 @@ DllMain ( HINSTANCE hInstance
, LPVOID reserved
);
#endif
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -1859,3 +1859,11 @@ void freeRtsArgs(void)
freeProgArgv();
freeRtsArgv();
}
// Local Variables:
// mode: C
// fill-column: 80
// indent-tabs-mode: nil
// c-basic-offset: 4
// buffer-file-coding-system: utf-8-unix
// End:
......@@ -25,3 +25,11 @@ void freeRtsArgs (void);
#include "EndPrivate.h"